Входная строка имела неверный формат - Pascal

Узнай цену своей работы

Формулировка задачи:

Здравствуйте. Небольшая загвоздочка вышла, не понятная мне. Не мог бы кто-нибудь подсказать в чем дело, пожалуйста? В программе с подключением внешнего файла, и считыванием значений из него, выползает ошибка "Входная строка имела не верный формат", какую строку указывал "неверной" пометила:
Листинг программы
  1. Program Ex2_2;
  2. Uses Crt;
  3. Var
  4. f: text;
  5. c: real;
  6. Begin
  7. ClrScr;
  8. Assign(f, 'ex2.txt');
  9. Reset(f);
  10. Writeln('В последовательности:');
  11. While not eof(f) do
  12. begin
  13. Read(f, c); <- Вот эту
  14. Write(c, ' ');
  15. end;
  16. Writeln;
  17. Close(f);
  18. End.

Решение задачи: «Входная строка имела неверный формат»

textual
Листинг программы
  1. Reset(f);
  2. While not seekeof(f) do
  3.  begin
  4.   Read(f, c);
  5.   Write(c:0:2,' ');//если числа вещественные
  6.  end;
  7. Close(f);

Объяснение кода листинга программы

  1. Reset(f); - открывает файл f для чтения.
  2. While not seekeof(f) do - начинается цикл, который будет выполняться до тех пор, пока не достигнут конец файла f.
  3. Read(f, c); - считывает значение из файла f и сохраняет его в переменной c.
  4. Write(c:0:2,' '); - выводит содержимое переменной c с двумя знаками после запятой в стандартный вывод.
  5. Close(f); - закрывает файл f после окончания чтения.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 3.933 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы