Дана матрица А(m,n) , найти творенье тех элементов, которые делятся на
Дана матрица А(m,n) , отыскать творение тех частей, которые делятся на 5 без остатка.
Задать свой вопросprogram zz1;
const m = 4; // задаем количество частей в массиве
n = 5;
var i, j, k:integer; // задаем переменные целого типа
a:array [1..m,1..n] of integer;
begin
for i:=1 to m do
for j:=1 to n do // получаем числа и записываем их в массив
a[i,j]:=random(21);
for i:=1 to m do // выводим приобретенный массив на экран
begin
for j:=1 to n do
write(a[i,j]:4);
writeln;
end;
k:=1;
for i:=1 to m do
for j:=1 to n do
if a[i,j] mod 5 = 0 then k:=k * a[i, j];
writeln( произведение тех частей, которые делятся на 5 без остатка = , k); //выводим ответ
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Химия.
Русский язык.
Геометрия.
Физика.
Русский язык.
Химия.
Математика.
География.
Литература.