Составьте на программе авс дано вещественное - вопрос №1293780 от annelya009 24.08.2021 22:54

Question

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

annelya009 · 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 за ренее : *