Составьте пожалуйста задачу на программе АВС Дано вещественное число А и целое число N(>0). Используя один цикл,найти значение выражения 1-А+А(в квадрате)-А(в кубе)+....(-1)N * АN за ренее спасииибооо:*

1

Ответы и объяснения

2012-04-18T19:51:50+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

var a,s,an:real;

i,n:integer;

Begin

  read(a,n);

  an:=1;

  for i := 0 to (n+1) do

    s:=s+an;

    an:=an*(-a);

  end;

  writeln(s);

End.