Ыберите верную последовательность васиных действий. выберите правильный ответ: a) вася сначала бежал, потом шел б) вася сначала стоял, потом шел, потом прыгал на одной ноге в) вася сначала стоял, потом прыгал на одной ноге, потом шел г) вася сначала прыгал на одной ноге, потом стоял, потом шел д) вася все время бежал
begin
pos := 0;
neg := 0;
null := 0;
writeln('Введите N:');
readln(n);
writeln('Введите N целых чисел:');
for i := 1 to n do
begin
read(a);
if(a < 0) then neg := neg + 1;
if(a > 0) then pos := pos + 1;
if(a = 0) then null := null + 1;
end;
writeln('Положительных чисел: ', pos);
writeln('Отрицательных чисел: ', neg);
writeln('Нулей: ', null);
end.
Тестовые решения:
1)ввод
8
1 2 0 3 0 -5 -4 2
вывод
Положительных чисел: 4
Отрицательных чисел: 2
Нулей: 2
2)ввод
6
0 0 3 -5 0 22
вывод
Положительных чисел: 2
Отрицательных чисел: 1
Нулей: 3