Составте программу, которая формирует массив из 12 случайных целых чисел принадлежещих промежутку -5;5 и выводит эти числа в столбец( через Паскаль)
Составте программу, которая формирует массив из 12 случайных целых чисел принадлежещих промежутку -5;5 и выводит эти числа в столбец( через Паскаль)
Ответ(ы) на вопрос:
Гость
Program Program1;
Var
a:array [1..12] of integer;
i:integer;
begin
randomize;
for i:=1 to 12 do
begin
a[i]:=random(11)-5;
writeln('a[',i,']=',a[i]);
end;
end.
Гость
var a: array[1..12] of real; i: integer; begin randomize; for i:=1 to 12 do a[i]:=random(11)-5; for i:=1 to 12 do writeln(a[i]); readln; end.
Не нашли ответ?
Похожие вопросы