Для того чтобы заполнить массив из 20 элементов случайными числами из отрезка [-20, 20] на языке программирования Pascal, можно воспользоваться следующим кодом:
program FillArrayRandomNumbers;
var
arr: array[1.20] of integer;
i: integer;
begin
randomize;
for i := 1 to 20 do
begin
arr[i] := random(41) - 20; // генерация случайного числа из отрезка [-20, 20]
end;
// Вывод массива на экран
writeln('Массив из 20 элементов случайными числами из отрезка [-20, 20]:');
for i := 1 to 20 do
begin
write(arr[i], ' ');
end;
end.
Этот код создает массив из 20 элементов, заполняет его случайными числами из отрезка [-20, 20] и выводит на экран полученный массив. Мы используем функцию random(41) - 20
, чтобы получить случайное число из отрезка [-20, 20].