Определить сколько нулевых элементов в массиве
Определить сколько нулевых элементов в массиве
Гость
Ответ(ы) на вопрос:
Гостьvar
A: array [1..10] of real;
i, n: integer; //n - счетчик
begin
n:= 0;
for i:= 1 to 10 do
begin
writeln('Введите число');
readln(A[i]);
if A[i] = 0 then n:= n + 1;
end;
writeln('Количество нулевых элементов: ', n);
end.
Не нашли ответ?
Похожие вопросы