Регистрация
kristinasurinaKighkj
27.04.2020 11:32
Информатика
Есть ответ 👍

Skdaksdkapdkapdadadsada

293
445
Посмотреть ответы 2

Ответы на вопрос:

nicita13254769p06wrf
nicita13254769p06wrf
4,5(1 оценок)

ответ:енренреонереоенииеннеиеиени

Объяснение:

ersnobestoy9uo8
ersnobestoy9uo8
4,4(44 оценок)

var a,count:integer;

begin

 repeat

   readln(a);

   if a > 4 then

   inc(count);

 until

 a = 0;

 writeln;

 writeln(count);

end.

Объяснение:


Программа получает на вход последовательность целых неотрицательных чисел, каждое число записано в о

Популярно: Информатика