41

Помогите составить программу решения задачи в паскаль АВС. Дано вещественное…

27 марта 2023

Помогите составить программу решения задачи в паскаль АВС. Дано вещественное число А и целое число N (больше 0). Используя один цикл, найти сумму 1+ А + Аквадрат + Акуб +… А в энной степени

категория: информатика

36

Var n, i: integer; a, y: real; begin readln (a, n); for i: =0 to n do y: =y+exp (ln (a)*I); writeln (y); end. Работает=)

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...