Question

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

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.