Составьте на программе авс дано вещественное число - вопрос №128476 от naivnaya08 20.10.2022 18:22

Question

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

naivnaya08 · Answer

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....

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