OJ-Problems-Source/QUSTOJ/1076.pas
2016-06-08 09:32:18 +08:00

8 lines
82 B
ObjectPascal

program ex;
var n:longint;
begin //main
read(n);
inc(n); n:=n*n-1;
write(n);
end.