Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
247074
18.08.2022 21:35 •
Информатика
Массив из 20 элементов, заполнен случайными числами в диапазоне от -50 до 50 . вывести на экран, посчитать количество нечетных чисел
Показать ответ
Ответ:
Мыркпвы
06.07.2020 16:49
Const N = 20;
Var i,k:integer; m:array [1..N] of integer;
Begin
randomize;
for i:=1 to N do begin
m[i]:=random(101) - 50;
writeln(m[i]);
end;
for i:=1 to N do
if m[i] mod 2 <> 0 then
inc(k);
writeln('Kol-vo netchetnih = ',k);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Данил67854
03.05.2023 23:07
Данные по температуре воздуха за декаду ноября хранятся в массивеюопределить,сколько раз температура опускалась ниже -10 градусов.заполнение массива осуществить с клавиатуры....
Ангелина0611
11.01.2021 22:38
В 7 «А» классе учащийся Руслан тренируется в футбольном клубе, у него по информатике оценка «5», Арина занимается гимнастикой, по информатике у нее «4», Венера занимается плаванием...
ваня20172
06.01.2022 15:04
Вывести первое число, если оно меньше второго, и оба числа, если это не так. ...
letsplei1212
14.01.2023 15:45
Упростите высказывания...
291104
27.12.2022 01:44
Процесс определения размеров фигуры. два слова...
миркинс
27.12.2022 01:44
Особенности внешнего строения и среда обитания губок безпозвоночных...
юля2738
27.12.2022 01:44
Пространства которое мы видим вокруг себя в...
Павлик8089
26.02.2022 03:40
Вмагазине на 36 р.можно купить 10 шариков.сколько таких же шариков можно купить на 18 р? сколько надо заплатить за 35 таких же шариков...
сом03
26.02.2022 03:40
Ккаждому существительному подберите несколько приложений. полученные сочетания запишите и объясните значения.: студент, бабушка, река, гора, город, деревня, станция, журнал,...
Matroyshka
26.02.2022 03:40
Сочинение сельский житель в городе или городской житель в сельской местности!...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var i,k:integer; m:array [1..N] of integer;
Begin
randomize;
for i:=1 to N do begin
m[i]:=random(101) - 50;
writeln(m[i]);
end;
for i:=1 to N do
if m[i] mod 2 <> 0 then
inc(k);
writeln('Kol-vo netchetnih = ',k);
readln;
end.