лабораторная работа / вар3 / лаба №4 вариант 3

Министерство образования и науки Российской Федерации

Федеральное агентство по образованию

Саратовский государственный технический университет

Балаковский институт техники, технологии и управления

ЛАБОРАТОРНАЯ РАБОТА

ПРОГРАММИРОВАНИЕ КОМБИНИРОВАННЫХ СУММ И

ПРОИЗВЕДЕНИЙ НА ЯЗЫКЕ TURBO PASCAL

Выполнил:

Проверил:

2010

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

Задание 3:

Y=

s2

p1

s1

Начало

S1=0

K=2,5

P1=1

S2=0

I=1,6

l=1,6

S2=S2+(L²+I)

P1=P1*(K+ I³)* S2

S1=S1+(I³+P2)+P1

Вывод P1

Конец

Блок–схема программы

Текст программы:

program lab_4;

var

s1, p1, s2: real; i, k, l: integer;

begin

s1:=0;

for i:=1 to 6 do

begin

p1:=1;

for k:=2 to 5 do

begin

s2:=0;

for l:=1 to 6 do s2:=s2+(sqr(l)+i);

p1:=p1*(k+exp(3*ln(i)))*s2;

end;

s1:=s1+exp(3*ln(i))+p1;

end;

writeln ('Y= ', s1:6:3);

end.

Результаты вычисления:

Y = 666041587530000000.000

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