лабораторная работа / lab_4 / lab_4

МИНИСТЕРСТВО ОБРАЗОВАНИЯ РОСИЙСКОЙ ФЕДЕРАЦИИ

САРАТОВСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ

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

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

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

ОТЧЕТ ПО ЛАБОРАТОРНОЙ РАБОТЕ

По курсу:

«Программирование и основы алгоритмизации»

ПРОГРАММИРОВАНИЕ КОМБИНИРОВАННЫХ СУММ И ПРОИЗВЕДЕНИЙ НА ЯЗЫКЕ TURBO PASCAL

Выполнил : Гр. УИТ – 21 Принял: «_____» ______________ 2008

Балаково 2008

Цель работы

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

Задание

Вариант №20.

Вычислить:

Блок-схема алгоритма решения

Начало

s₁ = 0

i = 1, 5

s₂= 0

j = 1, 4

p= 1

k = 1, 3

p = p*(j+2+i)

s₂ = s₂ + p

s₁₌s₁+(i²+i+1+s₂)²

Вывод p₁

Конец

Текст программы на языке Turbo Pascal

program lab_4;

var

s1,s2,p: double;

i,j,k,d: integer;

begin

s1:=0;

for i:=1 to 5 do

begin

s2:=0;

for j:=1 to 4 do

begin

p:=1;

for k:=1 to 3 do p:=p*(j+2+i);

s2:=s2+p;

end;

s1:=s1+sqr(sqr(i)+i+1+s2)

end;

writeln('Y=',s1);

end.

Ответ

Y = 2.507×10⁷

Проверка в Mathcad