Дана последовательность n чисел. составить программу - вопрос №9647716 от lenova32 16.04.2021 02:07

Question

Информатика: Дана последовательность n чисел. составить программу определения количества отрицательных чисел последовательности

lenova32 · Answer

var n,k,i,a:longint; begin k:=0; readln(n); for i:=1 to n do begin readln(a); if(a 0) then k:=k+1; end; writeln(k); end....