как записать степень в паскале. помогите

стандартной функции, на сколько я знаю, нет, вот пример "самодельной" функции, возводящей число x в степень y:function pow(x, y : integer) : integer;var i, res : integer;begin res := 1; for i:=1 to y do res := res*x; pow := res;end;