Рефераты Basic

Вернуться в Программирование

Basic
МИНИСТЕРСТВО ОБЩЕГО И
ПРОФЕССИОНАЛЬНОГО ЮБРАЗОВАНИЯ РФ

ТАМБОВСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ
УНИВЕРСИТЕТ



КАФЕДРА ГАПС



Курсовая работа

по информатике
Вариант №2



Выполнил: ст.гр.М-14 Топоз А.В.

Проверил:
Краснянский М.Н.



Тамбов 1999

Задание.
Разработать программу для построения графика функции y = a-x.
Программа должна:
n обеспечивать построение графика заданной функции на экране ПК;
n производить масштабирование аргумента и значения функции;
n строить оси координат, наносить на них разметку с определенной
дискретностью и подписывать их.;
n обеспечивать ввод коэффициентов заданной функции в диалоговом
режиме с клавиатуры, а область значений аргумента из файла
«dan.txt»;
n выводить значения функции в файл «dat.txt»;
n использовать процедуру – функцию для определения заданной
функции;
n использовать процедуру – подпрограмму для построения осей
координат, масштабной сетки, масштабирования.
Описание программы.
Для корректной работы программы необходимо иметь в каталоге бэйсика
следующие файлы:
KURS_T.BAS
DAN.TXT

После входа в QuickBASIC необходимо открыть файл KURS_T.BAS. Для чего
необходимо нажать клавишу «Alt», после чего в верху диалогового окна
выделится пункт меню «Файл». Далее необходимо войти в него нажатием клавиши
«Enter». После нажатия клавиши «Enter» высветится список подпунктов из
которых необходимо выбрать подпункт «Открыть . . .» с помощью клавиш «(»,
«(» и нажать «Enter».
После входа в подпункт меню «Открыть . . .» появится окно со списком
файлов с расширением *.BAS. Для открытия файла необходимо нажать клавишу
«Tab» и выбрать клавишами «(», «(» файл с названием KURS_T и нажать клавишу
«Enter».
После открытия файла KURS_T в диалоговом окне появится текст
программы. Для запуска программы необходимо нажать функциональную клавишу
F5, а для перезапуска программы одновременное нажатие клавиш «Shift» + F5.
После окончания работы программы необходимо выйти из бейсика, для чего
необходимо войти в пункт меню «Файл» и подпункт «Выход».
Основным модулем программы является файл KURS_T.BAS состоящий из
главной программы, процедуры – подпрограммы и процедуры – функции.
Главная программа осуществляет обращение к файлам, управление
процедурами и построение графика заданной функции.
Процедура – подпрограмма осуществляет построение координатной сетки и
ее разметки.
Процедура – функция позволяет рассчитать значение заданной функции.
Файл DAN.TXT необходим для ввода из него интервала изменения х.
После завершения программы появляется файл DAT.TXT в котором находятся
значения функции.



Текст программы
DECLARE SUB xoy (d!, t!, a!, b!)
DECLARE FUNCTION y! (b!, a1!)
CLS : SCREEN 9
COLOR 10
PRINT " - x"
PRINT "Функция у = а"
INPUT "Введите коэффициент a"; a1
n$ = "dan.txt"
OPEN n$ FOR INPUT AS #1
INPUT #1, a: INPUT #1, b: PRINT "x э ["; a; ","; b; "]"
CLOSE
i1 = 0: d = (300 * a) / b
DIM y1(1400)
FOR i = a TO b
i1 = i1 + 1
y1(i1) = y(i, a1): 'PRINT y1(i1)
NEXT i
i1 = 0
t = y1(1)
d1 = 160 / y1(1)
CALL xoy(d, t, a, b)
OPEN "dat
Добавить в Одноклассники    

 

Rambler's Top100