Question

Очень срочно! Напишите программу в паскале Запишите, используя функцию случайных чисел, заполнить числовой массив A, причем элементы массива должны представлять собой числа из отрезка (0,100)

Answer 1

===== PascalABC.NET =====

begin

 var n := ReadInteger('Укажи длину массива:');

 var a := ArrRandom(n, 0, 100);

 a.Println

end.

Answer 2

Конечно! Вот пример программы на языке Pascal, которая заполняет числовой массив A случайными числами в диапазоне от 0 до 100:

pascalCopy code
program RandomArray;

const
  N = 10; // Размер массива

var
  A: array[1..N] of Integer;
  i: Integer;

begin
  Randomize; // Инициализация генератора случайных чисел

  // Заполнение массива случайными числами
  for i := 1 to N do
  begin
    A[i] := Random(101); // Генерация случайного числа от 0 до 100
  end;

  // Вывод элементов массива
  writeln('Сгенерированный массив A:');
  for i := 1 to N do
  begin
    writeln(A[i]);
  end;

  readln;
end.

Программа создает массив A размером N (в данном примере равным 10) и использует функцию Random(101) для генерации случайных чисел от 0 до 100. Затем элементы массива выводятся на экран. Обратите внимание, что перед использованием функции Random, необходимо вызвать процедуру Randomize, чтобы инициализировать генератор случайных чисел.

Надеюсь, это поможет! Если у вас возникнут еще вопросы, не стесняйтесь задавать.