Задание:
Составьте пожалуйста задачу на программе АВС Дано вещественное число А и целое число N (>0). Используя один цикл, найти значение выражения 1-А + А (вквадрате) — А (в кубе)+… . (-1) N*АN за ренее спасиибоо: *
Решение:
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.
Знаете другой ответ?