Составьте программу вывода на экран "столбиком" четырех любых чисел. Через Паскал?

Var     i: integer; begin     for i := 1 to 4 do         writeln(Random(10)); end.