|
Программа построения графика
обеспечивать построение графика
заданной функции на экране ПК; строить оси координат, наносить на них разметку с
определенной дискретностью и подписывать их.; обеспечивать ввод
коэффициентов заданной функции в диалоговом режиме с клавиатуры, а область
значений аргумента из файла "dan.txt"; использовать процедуру – функцию для определения
заданной функции; использовать процедуру – подпрограмму для
построения осей координат, масштабной сетки,
масштабирования. Для корректной работы
программы необходимо иметь в каталоге бэйсика следующие
файлы: После входа в QuickBASIC необходимо открыть
файл KURS_T.BAS. Для чего необходимо нажать клавишу "Alt", после чего в верху
диалогового окна выделится пункт меню "Файл". Далее необходимо войти в него
нажатием клавиши "Enter". После нажатия клавиши "Enter" высветится список
подпунктов из которых необходимо выбрать подпункт "Открыть . . ." с помощью
клавиш " После входа в подпункт меню "Открыть . . ." появится окно со
списком файлов с расширением *.BAS. Для открытия файла необходимо нажать клавишу
"Tab" и выбрать клавишами " " файл с названием KURS_T и нажать клавишу
"Enter". После открытия файла KURS_T в диалоговом окне появится текст
программы. Для запуска программы необходимо нажать функциональную клавишу F5, а
для перезапуска программы одновременное нажатие клавиш "Shift" + F5. После
окончания работы программы необходимо выйти из бейсика, для чего необходимо
войти в пункт меню"Файл" и подпункт "Выход". Основным модулем программы
является файл KURS_T.BAS состоящий из главной программы, процедуры –
подпрограммы и процедуры – функции. Процедура – подпрограмма осуществляет построение координатной сетки и
ее разметки. Файл DAN.TXT необходим для ввода из него интервала изменения
х. DECLARE SUB xoy (d!, t!, a!,
b!) INPUT "Введите коэффициент a"; a1 i1 = 0: d = (300 * a) / b
t = y1(1) PRINT #2, "Функция y = "; a1 NEXT i NEXT i
FOR mx = 300 TO 625 STEP d COLOR 13: LOCATE
1, 37: PRINT "y" END SUB x э [ 2 , 20 ] y( 8 )= 1.953125E-03 y( 13 )=
6.103516E-05 y( 18 )= 1.907349E-06
| |