Написать программу, которая вводит в двумерный массив z[6:7] только четные числа

Question

Информатика

Ареф

10 июля, 18:12

Написать программу, которая вводит в двумерный массив z[6:7] только четные числа

+3

Ответы (1)

Знаете ответ на вопрос?

Рустя · Answer 1

Программа может выглядеть так:

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.