Question

Может ли кто-нибудь помочь с темой Массивы по информатике?
Сформировать и вывести на экран в строчку, через пробел, 25 элементов целого типа от -100 до 100 на языке паскаль.
Заранее спасибо

Answer 1

program Masivs;
var
  a: array [1..25] of integer;
  i: integer;
begin 
  {Формирование массива случайными числами в заданном диапазоне}
  randomize;
  for i:=1 to 25 do
   a[i]:=random(201)-100;

  {Вывод сгенерированных чисел}
  for i:=1 to 25 do
   Write(a[i],' ');
end;