Реферат: Вычисление элементарных функций

Умножим все выражение на Mf(x)

F(X) = F(Xs )×Mf(x) /Mf(xs) + D Xn-s ×F'(Xs ) Mf(x) /(Mf '( x ) ×MD x )

Подставляя значения полученные выше получим

F(X) = F(Xs ) + 2-5 ×D Xn-s ×F'(Xs )

где F(X)=f(x)×Mf(x) , F(Xs )=f(xs )×Mf(xs) , D Xn-s = D xn-s ×MD x ,

F'(Xs )= f'(xs )×Mf '( x ) , X = x*Mx - масштабированные значения

7. Граф – схема программы


8. Листинг и описание подпрограммы функции

8.1.Листинг подпрограммы функции

function Fx(masFx,masFhx:m;Xm:word;var ad:word):longint;

var

dx,fx1:word;

begin

ad:=Xm shr 3;

dx:=Xm and $6;

fx1:=dx*masFhx[ad];

fx1:=fx1 shr 5;

Fx:=masFx[ad]+fx1;

end;

8.2. граф – схема алгоритма


9. Листинг программы

program kir;

uses crt,dos,graph;

type

m=array[0..8] of word;

const

h=0.0625;

Mh=64;

Mf=64;

Mfh=32;

Mx=128;

function Fx(masFx,masFhx:m;Xm:word;var ad:word):longint;

var

К-во Просмотров: 700
Бесплатно скачать Реферат: Вычисление элементарных функций