Есть ответ 👍

Дано n чисел найти количество чисел со значением больше 10

112
410
Посмотреть ответы 2

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

magakhass
4,7(97 оценок)

Program murrrr; var c,a,n,x: integer; begin read (n); for a: =1 to n do begin read (x) if x> 0 then c: =c+1; end; write (c,' чисел> 10'); end. 
hcg1
4,5(23 оценок)

вывод обязательно 1

Объяснение:

с n=1 все идёт без повторов и выводиться 1

с n=4 будет 3 повтора, три раза вычтется 1 и тогда пройдет через действие k>2 с 1 через нет

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