Question

Решите пожалуйста!!!TurboPascal Сформировать и вывести на экран массив,элементы которого заданы датчиком случайных чисел на интервале [-45 , 98](размер произвольный)

Answer 1

Я могу помочь вам с решением задачи на TurboPascal. Вот пример кода, который сформирует и выведет на экран массив из 10 случайных целых чисел на интервале [-45, 98]:

program RandomArray;
var
  A: array[1..10] of integer; // объявляем массив из 10 элементов
  i: integer; // объявляем переменную для цикла
begin
  Randomize; // инициализируем генератор случайных чисел
  for i := 1 to 10 do // повторяем 10 раз
  begin
    A[i] := -45 + Random(144); // присваиваем i-му элементу массива случайное число от -45 до 98
    Write(A[i], ' '); // выводим i-й элемент массива на экран с пробелом
  end;
  Writeln; // переходим на новую строку
end.

Вы можете изменить размер массива, изменив число 10 на любое другое. Вы также можете посмотреть другие примеры работы с массивами и случайными числами на сайтах [Stack Overflow](https://stackoverflow.com/questions/4965863/how-to-get-a-random-number-in-pascal) и [DaniWeb](https://www.daniweb.com/programming/software-development/threads/288725/array-and-random-number). Надеюсь, это вам поможет.