Есть ответ 👍

Напишите программу: подсчитать количество нулей в массиве, состоящем из n целых чисел. элементы массива задавать вручную.

290
363
Посмотреть ответы 2

Ответы на вопрос:


ответ:

1. динамический массив

program p_1;

var n,i,k: integer;

a: array of integer;

begin

write('введите количество элементов массива ');

readln (n);

a : = new integer[n+1];

for i: =1 to n do

begin

write('введите ',i,' элемент массива ');

readln (a[i])

end;

k: =0;

for i: =1 to n do

if a[i] = 0 then k: =k+1;

writeln;

writeln('k = ',k)

end.

2. статический массив

program p_1;

var n,i,k: integer;

a: array [1..1000] of integer;

begin

write('введите количество элементов массива ');

readln (n);

for i: =1 to n do

begin

write('введите ',i,' элемент массива ');

readln (a[i])

end;

k: =0;

for i: =1 to n do

if a[i] = 0 then k: =k+1;

writeln;

writeln('k = ',k)

end.


32

Объяснение:

Популярно: Информатика