Входной и выходной файлы - 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
Объяснение кода листинга программы
- Задача программы - разделить входной строку на отдельные символы, убрать пробелы в начале и конце строки, сохранить результат в массив.
- Используется язык программирования QBasic.
- Входной файл с данными
INPUT.TXT
. - Переменная S$ используется для чтения строки из файла.
- Переменная k используется для подсчета количества символов во входной строке.
- Цикл FOR используется для прохода по каждому символу во входной строке.
- Условие IF используется для проверки, является ли текущий символ пробелом.
- Если текущий символ - пробел, то переменная k увеличивается на 1.
- Цикл FOR используется для прохода по каждому символу во входной строке.
- Переменная Sm$ используется для хранения текущего символа.
- Условие IF используется для проверки, является ли текущий символ пробелом.
- Если текущий символ - пробел, то переменная k увеличивается на 1.
- Если текущий символ не является пробелом, то он добавляется в конец массива R$.
- В конце программы происходит печать каждого элемента массива R$ для отладки.
- Переменная R$ используется для хранения результата разделения строки на отдельные символы.
- Переменная i используется для прохода по каждому элементу массива R$.
- Переменная j используется для подсчета количества элементов в массиве R$.
- Переменная Sm$ используется для хранения текущего элемента массива R$.
- Условие IF используется для проверки, является ли текущий элемент пустой строкой.
- Если текущий элемент пустой, то переменная j увеличивается на 1.
- Если текущий элемент не является пустой строкой, то он печатается на экране.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д