Циклы. Напечатать числа в виде таблицы, используя только циклы

@User233 · Регистрация: 27.02.2012

Напечатать числа в виде таблицы, используя только циклы (массивы и строки не применять):

Код

Добавлено через 2 минуты
В виде пирамидки

@igor_kz · 29.06.2012, 22:35

Pascal

Var n , i , j : integer;
Begin
    ReadLn(n);
    for i := 1 to n do begin
        for j := 1 to i do 
            Write(i,' ');
        Writeln;    
    end;
End.

Добавлено через 1 минуту

Pascal

Var n , i , j : integer;
Begin
    ReadLn(n);
    for i := 1 to n do begin
        for j := 1 to n - i do
            Write(' ');
        for j := 1 to i do 
            Write(i,' ');
        Writeln;    
    end;
End.

@User233 1 / 1 / 0 Регистрация: 27.02.2012 Сообщений: 47
		1
	Циклы. Напечатать числа в виде таблицы, используя только циклы 29.06.2012, 22:13. Просмотров 1911. Ответов 1 Метки нет (Все метки) Напечатать числа в виде таблицы, используя только циклы (массивы и строки не применять): Код 1 2 2 3 3 3 4 4 4 4 5 5 5 5 5 Добавлено через 2 минуты В виде пирамидки 0

Опции темы

Циклы. Напечатать числа в виде таблицы, используя только циклы

Решение