Вундеркингsd
14.12.2021 10:24

Найти количество чисел большее 1-му , 10 данных целых чисел.(паскаль)

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
leragoroshkova
09.10.2020 20:29
Var x,y,i: integer;
begin
y:=0;
for i:=1 to 10 do
begin
readln(x);
if x>1 then inc(y);
end;
writeln(y);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота