Входная строка имела неверный формат - 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 после окончания чтения.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д