С Новым годом! Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122

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

01.11.2011, 09:24. Показов 2289. Ответов 11
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Сейчас на олимпиадных задачах требуется, что бы данные подавались из файла Input.txt и записывались в выходной файл - output.txt. Как это сделать ?
В инете нашел типа Open имя_файла For Формат какой-то там. вобщем у меня не получается пишет, что файл не найден. хотя этот текстовый документ в одной папке с бейсиком.
допустим решение-
QBasic/QuickBASIC
1
2
3
4
CLS
INPUT A
X=2*A+4
?X
что нужно написать, что бы А подавалось в программу с текстового документы и результат записывался туда же.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
01.11.2011, 09:24
Ответы с готовыми решениями:

Преобразовать входной массив путём умножения каждого элемента на значение минимального во всём массиве.
1. На двумерный массив: Преобразовать входной массив путём умножения каждого элемента на значение...

Массив как входной параметр функции
Привет всем С помощью формул массива высчитываю данных, затем их хочу соединить. Возник вопрос,...

Выбрать с листа "юристы" выпускников окончивших АМВД. Выровнять структуру выходной информации
Здравствуйте! Помогите решить задачку в Exсel. Помогите создать макрос на VBA. есть таблица...

11
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
01.11.2011, 09:31
QBasic/QuickBASIC
1
2
3
4
5
OPEN "I", 1, "INPUT.TXT"
OPEN "O", 2, "OUTPUT.TXT"
INPUT #1, a
PRINT #2, 2*a +4
CLOSE #1,#2
0
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
01.11.2011, 09:34  [ТС]
File not found. пишет.(
0
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
01.11.2011, 09:52
проверь что точно есть файл INPUT.TXT и он находится в ток же категории что и qbasic если нет создай его.
0
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
01.11.2011, 10:20  [ТС]
Есть. INPUT.txt находится в одной папке с QBasic. А открывать не хочет. в чем может быть проблема?

Добавлено через 26 минут
Закрыто. Я идиот.))) зачем-то печатал txt после названия файла...
Миниатюры
Входной и выходной файлы  
0
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
10.11.2011, 10:53  [ТС]
такой вопрос
в входном файле содержится текст заклинания, к примеру -
Zv Ra Ca Dab RAR
как заполнить массив с входного файла? при этом количество символов в нем заранее неизвестно.
Помогите!! в Воскресенье олимпиада, кровь износу выиграть надо
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
10.11.2011, 13:56
как заполнить массив с входного файла?
Формат массива? Формат входного файла? Как можно подробнее...

количество символов в нем
В нём это в чём?
0
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
10.11.2011, 13:58  [ТС]
Извиняюсь за некорректное выражение мыслей, не выспался.
В общем во входном файле написано вышеуказанное заклинание. Мне нужно заполнить массив словами с этого заклинания. Слова разделают только пробелы. При этом не обязательно вышеуказанное заклинания подается, т.е. количество элементов заранее мы не знаем.
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
10.11.2011, 14:02
Читаем строку лайн инпутом, отшибаем пробелы слева и справа, считаем кол-во пробелов, заводим строковый массив из кол-ва элементов на единицу больше кол-ва пробелов. Дальше в цикле перефигачиваем все слова в массив. Чё сложного?
0
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
10.11.2011, 14:04  [ТС]
хм. А как сделать так что если следующий символ пробел то стопЭ Бейсик, вводи следующий элемент. уже задолбался, хотя вроде как просто все
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
10.11.2011, 14:28
хм. А как сделать так что если следующий символ пробел то стопЭ Бейсик, вводи следующий элемент.
Нужно думать головой, написать прогу фигня по сравнению с тем, сколько усилий нужно приложить к составлению верного алгоритма. Просто старайся придерживаться утверждения: что любую, хоть сколь сложную прогу можно всегда разложить на мелкие детали и написать простой принцип её реализации.
Вот попробуй это:
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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
 Аватар для AciD
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
10.11.2011, 14:30  [ТС]
Ты гений. Хотя...я думаю ты в курсе(;
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
10.11.2011, 14:30
Помогаю со студенческими работами здесь

Запуск внешнего приложения по пути, имени, входным и выходным параметрам
Как сделать макрос запуска некоторого исполняемого файла (запуск внешнего приложения по пути,...

Чтение из входного файла
Помогите пожалуйста!!!! Задача на QBasic. матрица 12x12 читается из входного файла. Проверьте...

Заполнить два массива с одного входного файла
о_О Короче в первой строке входного файла содержится количество элементов первого массива Во...

Сколько выходных в интервале ???
Имеется интервал между двумя датами 12.01.2004 и 26.03.2004 Сколько дней выходных в этом...

Как программно вычислять выходные дни?
При планировании надо понимать субботы с воскресеньями и не учитывать их


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока
igorrr37 05.01.2026
/ * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03
palva 04.01.2026
Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru