Цитата:
Inter:
Цитата:
Glukolov:
Цитата:
Inter:
А почему не так...?
Uses Crt;
Var
I:Integer;
St:String;
BEGIN
ClrScr;
TextColor(2);
Write('Wake up, Neo...');
For I:=1 To 27 Do
Begin
Delay(60000);
End;
ClrScr;
St:='Matrix has you. Follow the white rabbit.';
For I:=1 To Length(St) Do
Begin
Write(St[I]);
Delay(60000);
End;
END.
Неа! Не рулед! Надписи "Matrix has you" и "Follow the white rabbit" появлялись на экране побуковочно! Так что вот так!
А как они появляются в этой программе? Хотелось бы услышать Ваше мнение.
хз Если честно еще не проверял! надо посмотреть.
А давай вместе напишем Квадратную Шестнадцатицветную Матрицу в Паскале и за небольшую сумму зеленых бумажек будем подключать всех желающих? А мы будем операторы! А, как идейка?
__________________
Ложки нет! Смиритесь с этим...
Адрес поста | Один пост | Сообщить модератору | IP: Logged
24.02.2007 09:37
