Разжевать блок-схему. Опции

[Sto]

Ошибка:
200 Деление на ноль (некоректная арифметическая операция)
На диске С у тебя должен быть файл TWO.txt.
Или пропиши другой адрес к файлу.

Сообщение отредактировано: Sto - 10.05.2007 1:37

[samec]

"Assign (InFile, 'C:\TWO.txt');"
М... А что здесь за ошибка? Это из проги, размещенной Sto..

скорее всего ругается на неправильный путь к файлу, то есть не может найти файл, по указанному пути -> связать его с файловой переменной. Надо бы проверять, открылся файл или нет.

[volvo]

А вот и продолжение темы о том, что не надо подключать лишние модули к программе... Не пользовался бы KeyPressed - не надо было бы подключать CRT, не получил бы ошибку...

[Sto]

Интересно почему ошибка возникает во время работы с файлом.
Если всеже ошибка в CRT то нужно удалить строки:
Uses
Crt;
ClrScr;
И помеянть строку ReadKey; на ReadLn;

[мисс_граффити]

И помеянть строку ReadKey; на ReadLn;

repeat until readln, что ли, сделать?

я вообще-то еще вчера по этому поводу написала...