
Recagab
6 год назад
Задать массив м 14 случайными числами от 15 до 67
ОТВЕТЫ

Артемидор
Jul 26, 2019
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.
// Размер массива
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.
154
Смежные вопросы: