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)*xend;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 4670.85426424