Написать программу ,которая вводит в двумерный массив z[6:7] только четные числа
Написать программу ,которая вводит в двумерный массив z[6:7] только четные числа
Гость
Ответ(ы) на вопрос:
ГостьПрограмма может выглядеть так:
uses Crt;
const n=6;
m=7;
type Mas=array [1..n, 1..m] of integer;
var Z: Mas;
i,j: integer;
begin
ClrScr;
for i:=1 to n do
begin
for j:=1 to m do
begin
Z[i,j]:=2*(10+random(40));
Write (Z[i,j]:6);
end;
WriteLn;
end;
WriteLn;
ReadLn;
end.
Не нашли ответ?
Похожие вопросы