Предмет: Информатика,
автор: rong6149
Напишите программу, которая в последовательности натуральных чисел определяет, есть ли в последовательности хотя бы одно нечётное число, большее 100. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30 000.
Программа должна вывести «YES», если в последовательности есть хотя бы одно нечётное
число, большее 100, и «NO» в противном случае.
Пример работы программы
Входные данные
3 35 145 205
Выходные данные
yes
smartemii03jurma:
какой язык?
Ответы
Автор ответа:
0
Ответ:
program z1;
var a,n,i,k:integer;
begin
k:=0;
read(n);
for i:=1 to n do
begin
read(a);
if (a mod 2 = 1) and (a>100) then k:=k+1;
end;
if k>0 then write('YES') else write ('NO')
end.
Объяснение:
Используем цикл с параметром
Проверяем является ли введённое число нечётным и больше 100, если да, то увеличиваем переменную k на 1
Используем полный условный оператор, если k > 0 выводим YES, иначе выводим NO
Похожие вопросы
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Английский язык,
автор: gritsenkodarya
Предмет: Русский язык,
автор: skorobogatovas
Предмет: Информатика,
автор: helenchann