Вывести на экран массив из 10 случайных чисел паскаль (школьный уровень)

Каждое из 10 чисел имеет сколько цифр в своём составе? Каждое новое число обязано выводиться на новейшей строке, или в линию?

1)числа от 1 до 15 2) без различия 3) без цикла

пожалуйста

Знаю, смотрится немножко смешно, но всё же:

1. Program stogramm;
2. Begin
3.  writeln(random(15)+1);
4.  writeln(random(15)+1);
5.  writeln(random(15)+1);
6.  writeln(random(15)+1);
7.  writeln(random(15)+1);
8.  writeln(random(15)+1);
9.  writeln(random(15)+1);
10.  writeln(random(15)+1);
11.  writeln(random(15)+1);
12.  writeln(random(15)+1);
13. end.