Используя пример составить программу (x-y+5)^7

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (x,y):=ReadReal2;
  Writeln((x-y+5)**7)
end.

Пример
3.18 -1.152
6163439.12427756

Program n1;
var x,y: real;
begin
readln(x,y);
write(sqr(sqr(x-y+5))*sqr(x-y+5)*(x-y+5));
end.