Не понимаю две строчки в коде по сумме ряда.

@idmessage@yande · Регистрация: 10.01.2011

Author24 — интернет-сервис помощи студентам

Pascal

program summa;
function fact(n:integer):longint;
var 
   i:integer;
   ff:longint;
begin
  ff:=1;
  for i:=2 to n do
   ff:=ff*i;
  fact:=ff;
end;
var
  i,j,zn:integer;
  y,x,zovn,vnutr:real;
begin
x:=0.64;
zovn:=0;
for j:=6 to 16 do
begin
 vnutr:=0;
 i:=1;
 zn:=-1;
 while i <= 10 do
 begin
  y:=zn*(exp((i+x)*ln(x))+i)/(fact(3*i)+sqr(j));;
  vnutr:=vnutr+y;
  zn:=-zn;
  i:=i+1;
 end;
 zovn:=zovn + vnutr;
end;
writeln(zovn);
end.

У меня 13 числа екзамен по Паскалю. Прогу по сумме ряда я написать смогу. И все обьясеить смогу, только я незнаю зачем и что значет zn:=-1; и zn:=-zn;. Помогите плиз.

@Dekio · 10.01.2011, 18:10

Задание в студию

@Ungifted · 10.01.2011, 18:19

Переменная zn отвечает за знак соответствующего слагаемого ряда. Первый элемент имеет знак "-", второй - "+", третий - снова "-" и т.д.

@idmessage@yande · 10.01.2011, 18:24 **[ТС]**

Сообщение от Dekio

Задание в студию

@Dekio Фрилансер 5845 / 1226 / 499 Регистрация: 23.11.2010 Сообщений: 3,375 Записей в блоге: 1
	10.01.2011, 18:10	2
	Задание в студию 0

@Ungifted 5 / 2 / 2 Регистрация: 10.01.2011 Сообщений: 5
	10.01.2011, 18:19	3
	Переменная zn отвечает за знак соответствующего слагаемого ряда. Первый элемент имеет знак "-", второй - "+", третий - снова "-" и т.д. 0

@idmessage@yande 0 / 0 / 0 Регистрация: 10.01.2011 Сообщений: 4
	10.01.2011, 18:24 [ТС]	4
	Сообщение от Dekio Задание в студию 0