Есть ответ 👍

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

223
330
Посмотреть ответы 2

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

ак147
4,8(19 оценок)

Uses crt; var a: real; k,i: integer; begin for i: =1 to 10 do begin readln(a); if a< 0 then k: =k+1; end; write(k) end.

1+2+3+4n

Объяснение:

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