Определение нестандартных функций оператором DEF FN

Общий вид оператора

DEF FNV(<аргументы>) = <арифметическое выражение>,

где V - имя функции; <аргументы> - простые переменные - формальные аргументы функции; <арифметическое выражение> - формула, по которой вычисляется функция.

Арифметическое выражение в правой части должно содержать хотя бы один из формальных параметров, но может содержать также и другие переменные, общие для всей программы.

Оператор DEF FN должен располагаться в программе до первого использования определяемой им функции.

Вычисление функции, описанной оператором DEF FN, осуществляется при обращении к ней при помощи записи указателя функции

FNV (<арифметические выражения>),

где <арифметические выражения>, заменяют формальные параметры в арифметическом выражении правой части оператора DEF FN перед вычислением.

Пример 2. Вычислить значение функции

, где .

Здесь m - номер варианта, n –номер группы.

Программа для примера 2:

REM LR-1-2, m=13, n=5

DEF fnf(x,y) = cos(x^2+y^2)

INPUT m, n

z=(fnf(m/n, -2*n)+ fnf(3*(m+n), -5.5*m))/2/(m+n)

PRINT “z=”; z

END


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: