Function

Процедура FUNCTION имя [(параметры)] [STATIC]

имя [блок операторов]

Имя = выражение [блок операторов]

END FUNCTION

- имя – имя функции и возвращаемый ею тип данных, указанный суффиксом типа данных (%,&,!,#,$).

параметры – одна или несколько переменных, указывающих параметры, которые передаются в функцию при ее вызове:

переменная – имя переменной.

тип – тип данной переменной

переменная [()][AS тип][, переменная[()][AS тип]]…

[STATIC] – указывает, что значение локальных переменных функции сохраняются между вызовами функций.

[выражение] – возвращаемое значение функции.

Варианты третьего задания на контрольную работу.

Задание №3 содержит два вида заданий программирование разветвляющегося и циклического алгоритмов. Первый вид задания имеет нечетные номера вариантов - второй четные. Кроме этого в приложениях №1 и№2 даны среда программирования QBASIC и образец оформления третьего задания. В приложении №3 приводятся встроенные функции реализованные в среде QBASIC.

Пример №1. Программирование разветвляющегося алгоритма.

Пусть имеется программа, реализующая вычисление функции:

Алгоритм решения данной задачи будет иметь вид:

По полученному алгоритму запишем текст программы (используя блочную форму оператора IF):

CLS

REM С разветвлением

Pi=3.14

INPUT «Введите а»;а

INPUT «Введите х»;х

IF x>0 THEN

y=sin(Pi/(12+x))+x^2-5*a

ELSE

y=sin(Pi/(12+x))+x^2+5*a

END IF

PRINT «y=»;y

END

В данной программе имеются две ветви. В зависимости от значений переменной X процесс вычисления пойдет только по одной из них, другая же в это время будет игнорирована.

Пример №2. Программирование циклического алгоритма.

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

для х=-1 до 3 с шагом 0.5

Алгоритм решения данной задачи будет иметь вид:

Приведем один из возможных вариантов программы:

CLS

REM Циклическая программа

FOR х=-1 TO 3 STEP 0.5

y=(exp(x^2)+exp(-x^2))/2

PRINT “y(”;x;”)=”;y

NEXT х

END

Составить программу для вычисления значения функции. Результаты выдать на печать:

1. Y =
2. M= , для х = 0¸3; шаг 0,5.
3. Y =

1. N= , для х =0,4¸4; шаг 0,4.
2. Y =

6. P= , для х =0¸10; шаг 1.

1. Y =

1. R= e- , для х =0¸2; шаг 0,2.
2. . Y =

1. L= sin , для х =0¸3; шаг 0,3.

1. Y =

1. M= , для х =0¸4; шаг 0,5.

1. Y=

1. N= 5 x - 8ln x – 8, для х =2¸5; шаг 0,1.

1. R = где L (x)=

1. N= 5 x - 8ln x – 8, для х =2¸5; шаг 0,1.

1. R = где L (x)=

1. P= x - 2,89 sin - 0,126, для х=-1¸3; шаг 0,2.

19. R = где L(X)=

1. R= tg x -e^-x +x-1, для х=-1¸1; шаг 0,1.

1. R=
2. L= ln(x + )+ x +4, для х=1¸5; шаг 0,25.

1. R =

1. N= , для х =0¸5; шаг 0,25.

1. R =

26.

1. R =
2. 

29. R= где L(z) =

1.