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

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

abbara13777 12 августа 2022

Очень прошу! Помогите! Составьте программу которая заполняет массив 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
12 августа 2022
1
ответ
Написать программу, которая позволяет просматривать текстовые файлы (выводит на экран содержимое файла), например, файлы исходных программ Turbo Pascal. Имя просматриваемого файла должно вводится во время работы программы. Рекомендуемый вид экрана приведен ниже. Просмотр текстового файла. Введите полное имя файла и нажмите. -> d: \tp\pas\numb.pas
edmon
12 августа 2022
1
ответ
1) с клавиатуры вводится число n, за ним — массив из nцелых чисел и число х. Найдите количество элементов массива, значения которых равны х*х.2) Массив целых вводится с клавиатуры до нуля. Ноль при этом не учмтывается. Посчитайте количество отрицательных чисел в массиве.
burneds
12 августа 2022
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
12 августа 2022
1
ответ
Даны три целых числа. Написать программу выводящую те из них которые больше нуля и подсчитывающую их произведение. И сделайтеблок-схему.
mak80
12 августа 2022
1
ответ
1919 перевести в римскую систему счисления
zver1k
12 августа 2022
1
ответ
Выполните действия в двоичной системе счисления 1110+101
kudesnik
12 августа 2022
1
ответ
Если число меньше делимого равно этому числу, то это число называется чудом. Опредите, что данное число N является чудо цифрой. Формат входныхданных.
llight
12 августа 2022
1
ответ
Переведите число: а) 11010010 в десятичную систему счисления. Б) 172 в двоичную систему счисления.
userpc
12 августа 2022
1
ответ
Найти наибольший среди элементов массива А (10), остальные обнулить
Задайте свой вопрос

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