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

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

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

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

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

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

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

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

Выполнил:

Проверил:

2010

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

Задание 4:

Y=

s2

s1

p1

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

Начало

P1=1

K=1,5

S1=0

S2=0

I=1,6

L=1,8

S2=S2+K*I*L²+1

S1= S1+

P1=P1*S1

Вывод P1

Конец

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

program lab_4;

var

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

begin

p1:=1;

for i:=1 to 6 do

begin

s1:=0;

for k:=1 to 5 do

begin

s2:=0;

for l:=1 to 8 do s2:=s2+k*i*sqr(l)+1;

s1:=s1+sqrt(k*i+s2+1);

end;

p1:=p1*s1;

end;

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

end.

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

Y = 81859029780000.000

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