Для заполнения массива случайными числами в диапазоне [-10000; 10000] в Pascal ABC можно воспользоваться следующим кодом:
program RandomArray; var arr: array[1..10] of integer; // Задаем размер массива i: integer; begin Randomize; // Инициализируем генератор случайных чисел // Заполняем массив случайными числами в диапазоне [-10000; 10000] for i := 1 to 10 do arr[i] := Random(20001) - 10000; // Выводим заполненный массив на экран for i := 1 to 10 do WriteLn(arr[i]); end.
Этот код создает массив из 10 элементов и заполняет его случайными числами в диапазоне [-10000; 10000]. Для этого используется функция Random, которая генерирует случайное число от 0 до 20000, после чего вычитается 10000, чтобы получить числа в нужном диапазоне.
Для заполнения массива случайными числами в диапазоне [-10000; 10000] в Pascal ABC можно воспользоваться следующим кодом:
program RandomArray;var
arr: array[1..10] of integer; // Задаем размер массива
i: integer;
begin
Randomize; // Инициализируем генератор случайных чисел
// Заполняем массив случайными числами в диапазоне [-10000; 10000]
for i := 1 to 10 do
arr[i] := Random(20001) - 10000;
// Выводим заполненный массив на экран
for i := 1 to 10 do
WriteLn(arr[i]);
end.
Этот код создает массив из 10 элементов и заполняет его случайными числами в диапазоне [-10000; 10000]. Для этого используется функция Random, которая генерирует случайное число от 0 до 20000, после чего вычитается 10000, чтобы получить числа в нужном диапазоне.