Пожалуйста помогите.времени маловывести ** экран вертикально диапазон чисел от 1 до 10...

Question

Пожалуйста помогите.времени мало
вывести на экран вертикально диапазон чисел от 1 до 10 -10 раз.
/Паскаль/
это решение НЕ правильно:
var
i:integer;
begin
for i:=1 to 10 do
writeln('12345678910')
end.

Comments

должно получится так: 1111111111 на другой строчке 2222222222 на другой строчке 3333333333 и так до 10.т.е числа будут находится под друг другом вертикально

---

число 10 не много сдвинется

Answer 1

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  SeqGen(10,i->10*((i+1).ToString+' ')).Printlines
end.

Результат
1 1 1 1 1 1 1 1 1 1
2 2 2 2 2 2 2 2 2 2
3 3 3 3 3 3 3 3 3 3
4 4 4 4 4 4 4 4 4 4
5 5 5 5 5 5 5 5 5 5
6 6 6 6 6 6 6 6 6 6
7 7 7 7 7 7 7 7 7 7
8 8 8 8 8 8 8 8 8 8
9 9 9 9 9 9 9 9 9 9
10 10 10 10 10 10 10 10 10 10

Comments

а чтобы бы числа были в промежутке между друг другом? так должно быть:1 1 1 1 1 1 1 1 1 1
2 2 2 2 2 2 2 2 2 2
3 3 3 3 3 3 3 3 3 3
4 4 4 4 4 4 4 4 4 4
5 5 5 5 5 5 5 5 5 5
6 6 6 6 6 6 6 6 6 6
7 7 7 7 7 7 7 7 7 7
8 8 8 8 8 8 8 8 8 8
9 9 9 9 9 9 9 9 9 9
10 10 10 10 10 10 10 10 10 10

---

т.е не слитно были друг с другом,а через промежуток(пробел)?

---

извините