Eof(номер файла)
Значение этой функции может быть использовано в операторе IF для принятия решения о дальнейшем ходе выполнения программы.
Пример 17:
OPEN “a:\dannye.dat” FOR INPUT AS #2
20 INPUT #2,G$
PRINT G$
IF EOF(2) THEN CLOSE #2
GOTO 20
В результате выполнения этих операторов данные символьного типа будут считаны из файла dannye.dat, находящегося на диске а, и выведены на экран монитора.
Информацию, которая была записана в файл в среде Qbasic, можно обрабатывать другими программами, например, системой электронных таблиц Excel. Эта система позволяет достаточно просто строить, редактировать и печатать графики и диаграммы различных типов. Для того чтобы обработать в Excel файл, созданный с помощью программы на Qbasic необходимо:
загрузить Excel;
в меню выбрать команду Файл, в ней команду Открыть;
в появившемся окне открытия файлов выбрать Все файлы и открыть нужный файл;
в появившемся окне «мастер текстов» выбрать команду с разделителем и нажать кнопку Далее;
в появившемся окне выбрать пробел в качестве символа-разделителя и нажать кнопку Далее;
в появившемся окне выбрать общий формат и нажать кнопку ОК
когда файл откроется, выделить ячейки с данными и выбрать из главного меню команду Правка, в ней команду Заменить и заменить точки на запятые, т.к. в Excel в качестве разделителя целой и дробной части используется запятая.
Далее необходимо выполнить построение графиков и сохранить полученный файл в формате Excel под новым именем.
4. Советы по выполнению задания.
Внимательно прочитайте задание и попытаетесь осмыслить задачу.
Напишите, что известно и что требуется получить.
Опишите данные, которые будут необходимы при решении: массивы, переменные для циклов и т.д.
Пишите алгоритм сначала укрупненными блоками, а затем уже их детализируйте.
При работе на ЭВМ необязательно набирать сразу весь текст программы. Можно разбить программу на логически завершенные блоки и отлаживать ее постепенно.
Никогда не запускайте программу сразу на выполнение. Помните основное правило: сохраните текст, а затем включите режим отладки. Продумайте список переменных, за значениями которых необходимо наблюдать, т.е. осуществлять вывод их значений на экран дисплея или на печать.
Помните, что необходимо проверить все ветви программы, моделируйте при отладке программы различные ситуации. Цель тестирования – убедиться в том, что программа функционирует, как следует, и решает поставленную задачу.
Примеры решения задач.
Задачи на вычисление функций и сумм.
1. Вычислить функцию:
при
изменении
от 0 до
с шагом
.
PRINT : PRINT : PRINT
PI = 3.1416
FOR X = 0 TO 2 * PI STEP .2 * PI
Y = 1 - X
Y1 = COS(X)
IF Y = 0 OR Y1 = 0 THEN PRINT "DEL. NA 0": GOTO 10
Z = SIN(2 * X) / Y + 1 / Y1 ^ 2
PRINT USING " X=#.##"; X;
PRINT USING " Z=###.###"; Z
10 : NEXT X
X=0.00 Z= 1.000
X=0.63 Z= 4.083
X=1.26 Z= 8.131
X=1.88 Z= 11.197
X=2.51 Z= 2.160
X=3.14 Z= 1.001
X=3.77 Z= 1.180
X=4.40 Z= 10.156
X=5.02
Z=
10.783
X=5.65 Z= 1.739
X=6.28 Z= 1.001
2.
Вычислить
сумму:
.
CLS
PRINT : PRINT : PRINT: S = 0
FOR I = 1 TO 25
S1 = 0
FOR J = 1 TO I
IF I ^ 2 - J <> 0 THEN GOTO 20
PRINT " DELENIE NA 0 PRI I="; I; " I J="; J: GOTO 10
20 : Y = (I ^ 2 + J ^ 3) / (I ^ 2 - J): S1 = S1 + Y
10 : NEXT J
S = S + S1
NEXT I
PRINT " S=";
S
DELENIE NA 0 PRI I= 1 I J= 1
S= 1972.683
Задачи на распечатка массивов и операции над элементами массивов.