Как составить постановку, алгоритм и в pascale программу подсчитывающую количество положительных элементов массива w из 9 чисел. значения элементов массива ввести с клавиатуры. только можно поподробней)

rowa9712men rowa9712men    1   17.06.2019 06:50    8

Ответы
s1072966 s1072966  13.07.2020 22:20
Var
W:Array[1..9] of Integer;
i,k:Integer;
Begin
 for i:=1 to 9 do
  Read(W[i]);
for i:=1 to 9 do
 if (W[i]>0) then k:=k+1;
Writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика