program RandomNumber;varrandomNumber: real;beginrandomNumber := Random; // генерируем случайное число от 0 до 1writeln(randomNumber);end.
program RandomNumber;
var
randomNumber: real;
begin
randomNumber := Random; // генерируем случайное число от 0 до 1
writeln(randomNumber);
end.