Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата

имеет небольшую погрешность

значение функции  рассчитывается  при каждом шаге

4. Блок-схема программмы

Основная программа

Процедура  INIT

Вход

         f1,C[1],C[2],C[3]

        f1,k1,k2,k3,k4

   f1,Xn,Xk,dp,n,eps,p

выход

5. Программа

PROGRAM smith_04;USES crt;    VAR   i,n:integer;  sum,k1,k2,k3,k4,p,dp,eps,Xn,Xk,X,dX:real;  rSR,C,dC,r1,r2,r3,r4,cPR:array[1..3] of real;

  f1,f2:text;

  PROCEDURE Difur;

 BEGIN

        dC[1]:=C[3]*k2+C[2]*k4-C[1]*k1-C[1]*k3; {dcA}

        dC[2]:=C[1]*k3-C[2]*k4;                 {dcB}

        dC[3]:=C[1]*k1-C[3]*k2;                 {dcC}

 END;

  PROCEDURE RK_4;

 BEGIN

Рекомендуем скачать другие рефераты по теме: доклад 2011, шпори для студентів.





Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата