Вход
Регистрация
О проекте Как заработать?
60

Очень прошу! Помогите!

abbara13777 19 февраля 2023

Очень прошу! Помогите! Составьте программу которая заполняет массив a[ 1… 10] случайными числами в диапазоне от 0 до 2 и выводит на экран количествоэлементов равных 1

категория: информатика
ответить
в избранное

65

Varmass: array[1… 10] of integer; I,n: integer; beginn: =0; randomize; for I: =1 to 10 do beginmass[I]: =round (random (2); if mass[I]=1 then n: =n+1; end; write (n); end.

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
natutik
19 февраля 2023
1
ответ
Написать программу, которая позволяет просматривать текстовые файлы (выводит на экран содержимое файла), например, файлы исходных программ Turbo Pascal. Имя просматриваемого файла должно вводится во время работы программы. Рекомендуемый вид экрана приведен ниже. Просмотр текстового файла. Введите полное имя файла и нажмите. -> d: \tp\pas\numb.pas
edmon
19 февраля 2023
1
ответ
1) с клавиатуры вводится число n, за ним — массив из nцелых чисел и число х. Найдите количество элементов массива, значения которых равны х*х.2) Массив целых вводится с клавиатуры до нуля. Ноль при этом не учмтывается. Посчитайте количество отрицательных чисел в массиве.
burneds
19 февраля 2023
1
ответ
Умаляю, помогите! 1. Перевод графического изображения из аналоговой формы в дискретную называется… A. Дискретизация B. Формализация C. Переадресация D. Дискредитация 2. Расчет видеопамяти осуществляется по формуле: A. I памяти=2^N B. I памяти=I*X*Y C. I памяти=I^X^Y D. I памяти=N^2*X*Y3. Устройство, с помощью которого производится процесс перевода графической информации из аналоговой формы в дискретную, называется… A. Сканер B. Принтер C. Монитор D. Процессор E. Модем 4. Количество видеопамяти, необходимое для хранения 32 — цветного изображения размером 100 Х 100 пикселей равно… A. 50 000 бит B. 5 Кбайт С. 1 Мбайт D. 5 Мбайт 5. Какой объем памяти занимает страница напечатанного текста, если в строке 70 символов, а количество строк — 30? A. 2100 байт B. Около 2 Кбайт C. 1 Мбайт D. 1980 бит 6. 1 Мбайт — это… A. 1024 байта B. 1024 Кбайта C. 1024 бита 7. Какой объем информации будет содержать файл, созданный в adobe Photoshop по следующим установкам?
superki
19 февраля 2023
1
ответ
Даны три целых числа. Написать программу выводящую те из них которые больше нуля и подсчитывающую их произведение. И сделайтеблок-схему.
mak80
19 февраля 2023
1
ответ
1919 перевести в римскую систему счисления
zver1k
19 февраля 2023
1
ответ
Выполните действия в двоичной системе счисления 1110+101
kudesnik
19 февраля 2023
1
ответ
Если число меньше делимого равно этому числу, то это число называется чудом. Опредите, что данное число N является чудо цифрой. Формат входныхданных.
llight
19 февраля 2023
1
ответ
Переведите число: а) 11010010 в десятичную систему счисления. Б) 172 в двоичную систему счисления.
userpc
19 февраля 2023
1
ответ
Найти наибольший среди элементов массива А (10), остальные обнулить
Задайте свой вопрос

ПОПУЛЯРНОЕ
natutik, 19 февраля 2023
Написать программу, которая позволяет просматривать текстовые файлы
edmon, 19 февраля 2023
1) с клавиатуры вводится число n, за ним — массив из nцелых чисел и число…
burneds, 19 февраля 2023
Умаляю, помогите! 1. Перевод графического изображения из аналоговой формы в дискретную называется…
superki, 19 февраля 2023
Даны три целых числа. Написать программу выводящую те из них которые больше нуля и подсчитывающую их произведение
mak80, 19 февраля 2023
1919 перевести в римскую систему счисления
zver1k, 19 февраля 2023
Выполните действия в двоичной системе счисления 1110+101
kudesnik, 19 февраля 2023
Если число меньше делимого равно этому числу, то это число называется чудом
llight, 19 февраля 2023
Переведите число: а) 11010010 в десятичную систему счисления. Б) 172 в двоичную систему счисления
userpc, 19 февраля 2023
Найти наибольший среди элементов массива А (10), остальные обнулить
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...