Дан массив X(n*m) ).Элементы массива ввести с клавиатуры.Найти количество элементов кратных 5. Паскаль
Ответы
Ответ дал:
0
var a: array [1..100, 1..100] of integer;
i, j, k, c: integer;
begin
read(n, m);
for i:=1 to n do begin
for j:=1 to m do begin
read(c);
a[i,j]:=c;
if c mod 5 = 0 then k:=k+1;
end;
end;
write(k);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад