
30.05.2006, 01:33
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Не знаю как на С, а на Delphi ниже указанный код пашет...
var i:integer;
begin
i:=0;
repeat
writeln(i);
inc(i); //счетчик прибавления на 1.
sleep(1000);
until i=10;
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|