Задать массив м 14 случайными числами от 15 до 67

Question

Информатика

Майя

15 марта, 08:05

Задать массив м 14 случайными числами от 15 до 67

+5

Ответы (1)

Знаете ответ?

Михайла · Answer 1

Const z = 14;

/ / Размер массива

var

m: array [1 ... z] of integer;

i: integer;

begin

for i:=1 to z do begin

m[i] : = Random (15,67) ;

end;

writeln ('Элементы массива: ') ;

for i:=1 to z do begin w

rite (m[i],' ') ;

end;

end.