Testing/General/test-5.p


1
2
3
4
5
6
7
8
9
10
11
12

program main( input, output );
  var x, y: integer;
  function foo( x, y: integer ): integer;
  begin
	foo := x * x - y * y
  end;
begin
  read(x);
  y := foo( x+1, x-1 );
  write(y)
end.