Решения Паскаля помощь. В заданном одномерном массиве, состоящем из n чисел, подсчитать количество нулей.
Решения Паскаля помощь. В заданном одномерном массиве, состоящем из n чисел, подсчитать количество нулей.
Гость
Ответ(ы) на вопрос:
Гостьconst n=10;
var a:array[1..n] of integer;
i,k:integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=random(10)-5;
write(a[i],' ');
end;
writeln;
k:=0;
for i:=1 to n do
if a[i]=0 then k:=k+1;
writeln('k=',k);
end.
ГостьРешение приложено.
Всего доброго!
Не нашли ответ?
Похожие вопросы