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

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

Задать свой вопрос
Ирка Ульянчева
должно получится так: 1111111111 на иной строке 2222222222 на иной строчке 3333333333 и так до 10.т.е числа будут находится под друг приятелем вертикально
Игорек Возеленский
число 10 не много двинется
1 ответ
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

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

begin
  SeqGen(10,i-gt;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
Руслан Геллерлейб
а чтоб бы числа были в интервале меж друг приятелем? так обязано быть:1 1 1 1 1 1 1 1 1 12 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 45 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 78 8 8 8 8 8 8 8 8 89 9 9 9 9 9 9 9 9 910 10 10 10 10 10 10 10 10 10
Максим Развозов
т.е не слитно были друг с ином,а через просвет(пробел)?
София Корючева
извините
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт