для вычисления суммы членов ряда

ОТЧЕТ О ВЫПОЛНЕНИИ

ЛАБОРАТОРНЫХ РАБОТ ПО ДИСЦИПЛИНЕ «Основы алгоритмизации»

Выполнил(а) студент(ка)

группы 2 ИС

О.Н.Чернышова

_._.________

11.10.2012

(дата сдачи отчета)

Проверил преподаватель

Н.В.Кузнецова

Работа зачтена с отметкой

____(_____) ________

(подпись)

__.__.____

(дата проверки)

Лабораторная работа №4

Использование циклических алгоритмов и программ

для вычисления суммы членов ряда

Цель работы:

1. Построение схемы итерационного процесса;

2. Приобретение навыков в выборе и использовании операторов цикла.

a_n = (x+1) * 5ⁿ / n!

{Лабораторная работа 4}

{Вычисление суммы членов ряда с использованием оператора WHILE}

{Студентки гр. 2ИС Фамилии Чернышовой Ольги}

Uses crt; {Подключение стандартного модуля TP}

Var x, a, eps, S: real; n: integer;

BEGIN Clrscr; { Очистка экрана}

Writeln(' Введите x, eps'); read(x, eps);

{ Задание начальных значений переменных}

a: =x; n: =1; S: =a;

While а> =eps Do

Begin n: =n+1;

{Вычисление очередного члена ряда по формуле (2)}

a: =a*5*(х+1)/((х+1)*(n+1));

s: =s+a;

end;

Writeln(' Cумма членов ряда S = ', ' Число итераций n = ');

END.

Схема алгоритма с использованием цикла While... Do

нет

да

продолжение цикла

Вывод: Входе лабораторной работы я познакомилась сциклическими алгоритмами и программами для вычисления суммы членов ряда, научилась с помощью них решать примеры.