Входная строка имела неверный формат - 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 после окончания чтения.