2025-11-03 15:27:18 +03:00
|
|
|
|
// Функция Power
|
2015-05-14 22:35:07 +03:00
|
|
|
|
|
|
|
|
|
|
function Power(x: real; n: integer): real;
|
|
|
|
|
|
begin
|
|
|
|
|
|
Result := 1;
|
|
|
|
|
|
for var i:=1 to n do
|
|
|
|
|
|
Result *= x;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
begin
|
2025-11-03 15:27:18 +03:00
|
|
|
|
var x: real := 2;
|
|
|
|
|
|
var n: integer := 5;
|
|
|
|
|
|
Println($'{x} в степени {n} = {Power(x,n)}');
|
2015-05-14 22:35:07 +03:00
|
|
|
|
end.
|
