Показать сообщение отдельно
  #2  
Старый 03.01.2012, 05:23
Аватар для Kpyc
Kpyc Kpyc вне форума
Новичок
 
Регистрация: 05.05.2011
Сообщения: 75
Версия Delphi: Turbo Delphi
Репутация: 11
По умолчанию

Код:
for i := 1 to 100 do
  begin
    writeln(i);
    sleep(1000);
  end;
Ответить с цитированием