вычислить сумму 1-1/2+1/3-...(-1)^n+1*1/n условный оператор и операцию возведение в степень не использовать. Нужно блок схему и программу. Очень срочно. Пожалуйста.

Заранее большое спасибо

может лучше на С++ перейдёшь?) Я плохо паскаль знаю

не,сорян,не получаеться, плохо знаю паскаль(

у нас по школьной программе паскаль

ну ладно сама попробую разобраться

Спасибо большое) Можете ещё написать что каждая переменная значит?

   int a;    a=otvet    cout << "primer" << endl;    cout << a << endl;

Программа:var n,i,z:integer; a,s:real;beginwrite('n = '); readln(n);s:=0; z:=-1;for i:=1 to n do begin z:=-z; a:=z/i; s:=s+a; end;writeln('s= ',s);end.Пример:n = 5s= 0.783333333333333Блок-схема - в прилагаемом файле.