лабораторная работа / ЛАБ4

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

Вложенные циклы.

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

Задание: Найти значение выражения:

Блок-схема:

Программа:

program lab4;

var i,j,k:integer;p,s1,y:longint;

begin

y:=1;

for i:=1 to 5 do

begin

p:=1;

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

s1:=0;

for k:=1 to 4 do s1:=s1+sqr(k)+1;

y:=y+sqr(p+s1)

end;

writeln(y:10);

end.

Полученное Y=167932453