![]() |
![]() |
Романтик |
![]()
Сообщение
#1
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 159 Пол: Мужской Реальное имя: Anton Репутация: ![]() ![]() ![]() |
Я тут с одноклассником поспорил, что вот эта прога работает всегда и стабильно.
Сначала я читаю изфайла и вывожу 1 и 3 строки. Код var pas:text; a,c,b:string; begin assign(pas,'C:\windowr\pase'); reset(pas); readln(pas,a); readln(pas,b); readln(pas,c); close(pas); writeln(a); writeln(c); end. по-моему здесь все правильно. -------------------- made in USSR.
|
![]() ![]() |
klem4 |
![]()
Сообщение
#2
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
У меня например твоя программа вообще не работает ... Почему ? Попробуй догадаться сам.
ps файл текстовый и лежит в правильно директории Сообщение отредактировано: klem4 - 26.02.2006 20:51 -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Романтик |
![]()
Сообщение
#3
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 159 Пол: Мужской Реальное имя: Anton Репутация: ![]() ![]() ![]() |
Ну если не смотреть на директорию, если все как надо.
![]() -------------------- made in USSR.
|
![]() ![]() |
![]() |
Текстовая версия | 9.07.2025 15:45 |