Question

Составить программу, которая формирует массив из 8 случайных вещественных чисел, принадлежащих промежутку [8;9) и выводит эти числа в столбец с двумя десятичных цифрами

Answer 1

var
i:integer;
a:array [1..8] of real;   
begin  
randomize;
for i:=1 to 8 do
begin
a[i]:=8+ Random;
writeln(a[i]:0:2);
end;
end.