Регистрация
Love2111
20.01.2023 06:10
Информатика
Есть ответ 👍

Помагите но правильно ​

220
298
Посмотреть ответы 1

Ответы на вопрос:

ekaterina5velikaya
ekaterina5velikaya
4,7(63 оценок)
Var x,n: real; begin write('x = '); readln(x); write('n = '); readln(n); writeln('s = ',x*x*x*(1+x*x)+power(x,n)); end. с функции возведения в степень, при условии, что основание - число вещественное, а показатель - целое. function st(o: real; p: integer): real; begin result: =1; for p: = 1 to p do       result: =result*p; end; var x: real; n: integer; begin write('x = '); readln(x); write('n = '); readln(n); writeln('s = ',x*x*x*(1+x*x)+st(x,n)); end.

Популярно: Информатика