Дана последовательность n чисел. составить программу - вопрос №9648393 от valerunik160val 22.11.2021 01:54

Question

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

valerunik160val · 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....