Program Variant_0;

Uses WinCRT;

Var x, s, f, x_nach, x_kon, delta_x, eps, t: Real;

N: Word;

Begin

WriteLn('Лабораторная работа №3');

WriteLn('Вариант №0');

WriteLn('ИС-11-1');

WriteLn('Пупкин Василий');

WriteLn;

{ввод исходных данных}

WriteLn(‘Ввод исходных данных:’);

Write('x_nach=');

ReadLn(x_nach);

Write('x_kon=');

ReadLn(x_kon);

Write('delta_x=');

ReadLn(delta_x);

Write('eps=');

ReadLn(eps);

WriteLn;

{эхо-печать}

WriteLn('Для x=', x_nach:0:3, ' до ', x_kon:0:3, ' шаг=', delta_x:0:3, ' точность=', eps:0:5);

WriteLn;

WriteLn(' x n s f');

WriteLn('-----------------------------------');

x:=x_nach;

Repeat

{внешний цикл – изменение аргумента}

t:=1.0; {первое слагаемое}

s:=1.0; {начальное значение суммы}

n:=1;

f:=cos(x); {точное значение суммы}

While (Abs(t)>eps) Do

{внутренний цикл – вычисление суммы ряда в отдельной точке}

Begin

t:=-t*x*x/(2.0*n*(2.0*n-1.0)); {очередное слагаемое}

s:=s+t; {очередная сумма}

n:=n+1;

End;

WriteLn(x:0:3, ' ', n:3, ' ', s:0:6, ' ', f:0:6);

x:=x+delta_x; {изменение значения аргумента}

Until(x>x_kon);

End.

3.2. На языке Си:

#include <stdio.h> //директивы препроцессора

#include <conio.h>

#include <math.h>

Int main()

{

//описание переменных

Float x, s, f, x_nach, x_kon, delta_x, eps, temp;

Int n;

printf("\nЛабораторная работа №3");

printf("\nВариант №0");

printf("\nПО-11-1");

printf("\nПупкин Василий\n");

printf("\nВвод исходных данных:\n"); //ввод исходных данных

printf("\nx_nach=");

scanf("%f", &x_nach); //начальное значение аргумента

printf("\nx_kon=");

scanf("%f", &x_kon); //конечное значение аргумента

printf("\ndelta_x=");

scanf("%f", &delta_x); //шаг изменения аргумента

printf("\neps=");

scanf("%f", &eps); //точность вычислений

//эхо-печать

printf("\nДля x=%5.3f до %5.3f с шагом %5.3f и точностью %5.3f\n", x_nach, x_kon, delta_x, eps);

printf("\n x n s f");

printf("\n--------------------------------------");

x = x_nach;

do //внешний цикл - изменение аргумента

{

temp = 1.0; //первое слагаемое

s = 1.0; //начальное значение суммы

n = 1; //количество итераций на каждом шаге

f = cos(x); //точное значение функции

//внутренний цикл - вычисление суммы ряда

while (fabs(temp) > eps)

{

//очередное слагаемое

temp *= - x * x / (2.0 * n * (2.0 * n - 1.0));

s += temp; //очередная сумма

n++; //количество итераций

}

printf("\n%5.3f %d %0.6f %0.6f", x, n, s, f);

x += delta_x; //увеличение аргумента на шаг delta_x

}

while (x <= x_kon);

printf("\n--------------------------------------");








Дата добавления: 2015-04-19; просмотров: 775;


Поиск по сайту:

При помощи поиска вы сможете найти нужную вам информацию.

Поделитесь с друзьями:

Если вам перенёс пользу информационный материал, или помог в учебе – поделитесь этим сайтом с друзьями и знакомыми.
helpiks.org - Хелпикс.Орг - 2014-2024 год. Материал сайта представляется для ознакомительного и учебного использования. | Поддержка
Генерация страницы за: 0.01 сек.