Информатика. Учебно-методическое пособие. Артемова С.В - 17 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

Составители: 

Рубрика: 

n=1; // Начальное значение аргумента для вычисления члена ряда
ch=1; // Начальное значение члена ряда
s=0; // Присвоение начального значения рекуррентного выражения
// накопления суммы
while(ch>a) // Цикл выполняется до тех пор, пока очередное значение
{ // выражения больше заданной точности
f=1; // Присвоение начального значения рекуррентного выражения
// вычисления факториала
for(i=1; i<=n; i++) f*=i; // Вычисление факториала
ch=(n+1)/(2*f); // Вычисление выражения
s+=ch; // Накопление суммы
n++; // Переход к следующему члену ряда
}
printf("Сумма равна s=%f", s); // Вывод полученного значения
// суммы на экран
getch(); // Задержка экрана до нажатия любой клавиши
}
Пример программы на языке СИ
Программа вычисляет произведение чисел ряда:
// Подключаемые библиотеки
#include<stdio.h> // Библиотека ввода-вывода
#include<conio.h> // Библиотека работы с окнами
#include<math.h> // Библиотека математических функций
void main(void) // Главная функция (основной блок программы)
{
// Раздел объявления локальных переменных
int n,i; // Переменные счетчика цикла
float p,ch,m,f; // p-произведение членов ряда ch, f-факториал
clrscr(); // Очистка экрана
printf("Составитель: Грибков Алексей Николаевич");
printf("\n\t\tФакультет КТФ, группа Р-11");
printf("\n\nВведите конец интервала (число m): ");
scanf("%f",&m); // Ввод верхней границы произведения
p=1; // Присвоение начального значения рекуррентной формуле
// накопления произведения
for(n=1;n<=m;n++) // Цикл выполняется до тех пор, пока n<m
{
f=1; // Присвоение начального значения рекуррентной формуле
// вычисления факториала
for(i=1;i<=n;i++) f*=i; // Вычисление факториала
ch=(sqrt(f)+8*n)/(3*n-2); // Вычисление члена ряда
p*=ch; // Вычисление произведения
}
printf("Произведение равно p=%f", p); // Вывод полученного значения
// произведения на экран
getch(); // Задержка экрана до нажатия любой клавиши
}
Содержание отчета
1 Цель лабораторной работы.

Страницы