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

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