Входной и выходной файлы - QBasic

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

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

Сейчас на олимпиадных задачах требуется, что бы данные подавались из файла Input.txt и записывались в выходной файл - output.txt. Как это сделать ? В инете нашел типа Open имя_файла For Формат какой-то там. вобщем у меня не получается пишет, что файл не найден. хотя этот текстовый документ в одной папке с бейсиком. допустим решение-
что нужно написать, что бы А подавалось в программу с текстового документы и результат записывался туда же.

Решение задачи: «Входной и выходной файлы»

textual
Листинг программы
CLS
 OPEN "I", 1, "INPUT.TXT"
   LINE INPUT #1, S$
   S$ = LTRIM$(RTRIM$(S$))
     FOR i = 1 TO LEN(S$)
        IF MID$(S$, i, 1) = " " THEN k = k + 1
     NEXT
 
   DIM R$(k + 1): k = 1
     FOR i = 1 TO LEN(S$)
        Sm$ = MID$(S$, i, 1)
        IF Sm$ = " " THEN
          k = k + 1
          ELSE R$(k) = R$(k) + MID$(S$, i, 1)
        END IF
     NEXT
 
 CLOSE 1
 
  ' -  Отладка  -
  FOR i = 1 TO k
     PRINT R$(i)
  NEXT

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

  1. Задача программы - разделить входной строку на отдельные символы, убрать пробелы в начале и конце строки, сохранить результат в массив.
  2. Используется язык программирования QBasic.
  3. Входной файл с данными INPUT.TXT.
  4. Переменная S$ используется для чтения строки из файла.
  5. Переменная k используется для подсчета количества символов во входной строке.
  6. Цикл FOR используется для прохода по каждому символу во входной строке.
  7. Условие IF используется для проверки, является ли текущий символ пробелом.
  8. Если текущий символ - пробел, то переменная k увеличивается на 1.
  9. Цикл FOR используется для прохода по каждому символу во входной строке.
  10. Переменная Sm$ используется для хранения текущего символа.
  11. Условие IF используется для проверки, является ли текущий символ пробелом.
  12. Если текущий символ - пробел, то переменная k увеличивается на 1.
  13. Если текущий символ не является пробелом, то он добавляется в конец массива R$.
  14. В конце программы происходит печать каждого элемента массива R$ для отладки.
  15. Переменная R$ используется для хранения результата разделения строки на отдельные символы.
  16. Переменная i используется для прохода по каждому элементу массива R$.
  17. Переменная j используется для подсчета количества элементов в массиве R$.
  18. Переменная Sm$ используется для хранения текущего элемента массива R$.
  19. Условие IF используется для проверки, является ли текущий элемент пустой строкой.
  20. Если текущий элемент пустой, то переменная j увеличивается на 1.
  21. Если текущий элемент не является пустой строкой, то он печатается на экране.

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


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

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

14   голосов , оценка 3.786 из 5
Похожие ответы