Нужна программа в паскале (с "ramdomize") N=27 заполнить массив с помощью случайных чисел от-20 до 20
Нужна программа в паскале (с "ramdomize")
N=27 заполнить массив с помощью случайных чисел от-20 до 20
Гость
Ответ(ы) на вопрос:
Гостьvar
a: array[1..20] of integer;
i: integer;
begin
randomize;
for i:=1 to 20 do
a[i] := random(41) - 20;
for i:=1 to 20 do
write(a[i], ' ');
writeln;
end.
Не нашли ответ?
Похожие вопросы