Pascal: Вычислить значение выражения y=x^n – z^k. Вычисление значения степени оформить
Pascal:
Вычислить значение выражения y=x^n – z^k. Вычисление значения степени оформитьв виде рекурсии.
Гость
Ответ(ы) на вопрос:
Гость Function Pow(x:real;n:integer):real;
begin
if n=0 then Pow:=1
else Pow:=Pow(x,n-1)*x
end;
var
x,z:real;
n,k:integer;
begin
Writeln('Введите x,n,z,k: '); Read(x,n,z,k);
Writeln(Pow(x,n)-Pow(z,k))
end.
Пример
Введите x,n,z,k:
3.7 5 2.18 4
670.85426424
Не нашли ответ?
Похожие вопросы