Question

Паскаль
Сформировать массив В из 16 чисел, в диапазоне [5;80] и вывести его в строчку.

Answer 1

var b:array[1..16] of longint;
    i:longint;

begin
randomize;
for i := 1 to 16 do b[i] := random(76)+5;
for i := 1 to 16 do write(b[i],' ');
end.