Question

Напишите программу на паскале по выводу на экран массива В состоящий из 10 чисел (в интервале от 0 до 25) сгенерированных случайным образом. Выведите массив на экран с комментариями.​

Answer 1

var

 i:integer;

 b:array [1..10] of integer;

Begin

 for i:=1 to 10 do

   begin

     b[i] := random(10);

     write(b[i],' ');

   end;

End.