uses System.Math;

var
  Number, Power1, Result1, Result2: Double;
begin
  Number := 8;
  Power1 := 3;

  Result1 := Power(Number, Power1);
  //Result1 is 512.0

  //square: dedicated function
  Result2 := Sqr(Number);
  //Result2 is 64.0

  WriteLn('result1 is ', Result1:0:1);
  WriteLn('result2 is ', Result2:0:1);
end.