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

БАЛАКОВСКИЙ ИНСТИТУТ ТЕХНИКИ ТЕХНОЛОГИИ И УПРАВЛЕНИЯ

ФАКУЛЬТЕТ ИНЖЕНЕРНО-СТРОИТЕЛЬНЫЙ

КАФЕДРА УПРАВЛЕНИЯ ИНФОРМАТИКИ В ТЕХНИЧЕСКИХ СИСТЕМАХ

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

ПО ДИСЦИПЛИНЕ

,,ПРОГРАММИРОВАНИЕ И ОСНОВЫ АЛГОРИТМА,,

Выполнил: ст. гр. УИТ-23

Приняла:

Балаково 2005

Цель работы: научиться вычислять комбинированные суммы и произведения.

5 6 8

Задание: вычислить ∏ ( ∑((i²+k)∙∑(l³+k²+i)))

i=1 k=2 l=3

начало

i=1,5

k=2,6

S1=0

l=3,8

P1=P1∙S2

P1=1

P1

S2=0

конец

S1=S1+(l³+k²+i)

S2=S2+((SQR(i)+k)∙S1

program lab4;

Var P1, S1, S2:real; i, k, l:byte;

Begin

P1:=1;

For i:=1 to 5 do

Begin

S2:=0;

For k:=2 to 6 do

Begin

S1:=0;

For l:=3 to 8 do S1:=S1+(exp(3*ln(l))+SQR(k)+i);

S2:=S2+(i*i*k)*S1;

end;

P1:=P1*S2;

end;

Write('P1=', P1:10:1);

readln;

End.