Входная строка имела неверный формат - Pascal
Формулировка задачи:
Здравствуйте. Небольшая загвоздочка вышла, не понятная мне. Не мог бы кто-нибудь подсказать в чем дело, пожалуйста?
В программе с подключением внешнего файла, и считыванием значений из него, выползает ошибка "Входная строка имела не верный формат", какую строку указывал "неверной" пометила:
Program Ex2_2; Uses Crt; Var f: text; c: real; Begin ClrScr; Assign(f, 'ex2.txt'); Reset(f); Writeln('В последовательности:'); While not eof(f) do begin Read(f, c); <- Вот эту Write(c, ' '); end; Writeln; Close(f); End.
Решение задачи: «Входная строка имела неверный формат»
textual
Листинг программы
Reset(f); While not seekeof(f) do begin Read(f, c); Write(c:0:2,' ');//если числа вещественные end; Close(f);
Объяснение кода листинга программы
Reset(f);
- открывает файл f для чтения.While not seekeof(f) do
- начинается цикл, который будет выполняться до тех пор, пока не достигнут конец файла f.Read(f, c);
- считывает значение из файла f и сохраняет его в переменной c.Write(c:0:2,' ');
- выводит содержимое переменной c с двумя знаками после запятой в стандартный вывод.Close(f);
- закрывает файл f после окончания чтения.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д