Общий форум @ Timus Online Judge

Online Judge	Задачи	Авторы	Соревнования
О системе Часто задаваемые вопросы Новости сайта Форум Ссылки	Архив задач Отправить на проверку Состояние проверки Руководство	Регистрация Исправить данные Рейтинг авторов	Текущее соревнование Расписание Прошедшие соревнования Правила

вернуться в форум

Общий форум

Why do I get output limit exceeded?

Послано Jiang Xu 4 июл 2003 01:54

var n, i, j : integer;
begin
readln(n);
for i:=n downto 1 do
begin
    writeln(n-i);
    for j:=1 to i do writeln('X');
    for j:=1 to i do writeln('*');
end;
for i:=1 to n do writeln('+');
end.