Question

В заданном одномерном массиве V, состоящем из 50 целых чисел, подсчитать количество нулей. Элементы массива - случайные числа​

Answer 1

Ответ:

var v: array [1..50] of integer;

k,i:integer;

begin

 randomize;

 for i:=1 to 50 do

   v[i]:=random(50);

 for i:=1 to 50 do

   if v[i]=0 then

     k:=k+1;

write(k);

end.

Объяснение: