Вводится некоторое количество (n) целых чисел. - вопрос №2587225 от zana06191 27.03.2021 21:29

Question

Информатика: Вводится некоторое количество (n) целых чисел. найти среди них количество отрицательных чисел

zana06191 · Answer

Var a,k,n:integer;beginreadln(n);for n:=n downto 1 do beginread(a);if a 0 then inc(k);end;writeln(k);end....