Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторный практикум по QBasic.doc
Скачиваний:
4
Добавлен:
29.04.2019
Размер:
5.12 Mб
Скачать

Зразок виконання завдання.

Протабулювати функцію

де a – будь-яке число; x= -5;-4,5;-4 ;...;9.

Позначимо початкове, кінцеве значення і крок зміни аргументу відповідно =-5; =9; =0.5

REM Лабораторна робота № 4

Табулювання функції

CLS

INPUT “Введіть A, Xn, Xk, H”; A, Xn, Xk, H

FOR X=Xn TO Xk STEP H

IF X<-3 AND X-A>0 THEN Y=SIN(EXP(X)/SQR(X-A)) : PRINT “X=”;X, “Y=”; Y: GOTO 10

IF X>-2 AND X<5 AND cos(x)>0 THEN Y=LOG(COS(X)) : PRINT “X=”;X, “Y=”; Y: GOTO 10

IF X>7 AND X^2-A=0 THEN EXP(SQR(X^2-A)): PRINT “X=”;X, “Y=”; Y: GOTO 10

PRINT “X=”;X; “ Функція невизначена”

10 NEXT X

END

Контрольні запитання

1. Оператор IF.

2. Оператор IF…THEN…ELSE.

3. Способи використання оператора IF.

4. Оператор GOTO.

5. Оператор ON…GOTO.

6. Оператор SELECT CASE.

7. Цикли, що використовують оператори FOR…NEXT.

Варіанти завдань

Обчислити значення функції, заданної в таблиці (протабулювати функцію). Здійснити вивід найменування змінних та обчисленого значення функції.

№ п/п

Вид функції

Умови виконання

Значення змінних

Інтервали

1

2

3

4

5

1

a = -0,5

b = 2

2

a = 1,5

3

a = 2,8

b = -0,3

c = 4

4

a = 1,65

x[0,7;2]

x = 0,1

5

a = 2,3

x[0,2;2,8]

x = 0,2

6

a = 2,5

x[1;5]

x = 0,5

7

b = 1,5

x[0,1;1]

x = 0,1

1

2

3

4

5

8

__

x[2;5]

x = 0,25

9

a = 20,3

x[0,5;2]

x = 0,1

10

t = 2,2

x[0,2;2]

x = 0,2

11

a = 2,6

b=-0,39

x[0;7]

x = 0,5

12

a= 0,9

x[0,8;2]

x = 0,1

13

a = 2,1

b = 1,8

c=-20,5

i[0,12]

i = 1

14

a = 0,3

n = 10

i[1;10]

i = 1

15

a = 2,5

b =0,4

t[-1;1]

t = 0,2