Составьте программу,которая формирует массив из 10 случайных чисел,принадлежащих промежутку [-9;9] , и выводит эти числа в столбец.
Составьте программу,которая формирует массив из 10 случайных чисел,принадлежащих промежутку [-9;9] , и выводит эти числа в столбец.
Гость
Ответ(ы) на вопрос:
ГостьProgram zz;
var a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do
a[i]:=random(19)-9;
for i:=1 to 10 do
writeln(a[i]);
end.
Гостьconst
n = 10;
var
x: array[1..n] of integer;
i: integer;
begin
Randomize;
Writeln('Элементы массива:');
for i := 1 to n do
begin
x[i] := Random(19) - 9;
Writeln(x[i])
end
end.
Тестовое решение:
Элементы массива:
-9
0
-3
4
3
9
-7
9
6
-6
Не нашли ответ?
Похожие вопросы