mirror of
https://github.com/Kiritow/OJ-Problems-Source.git
synced 2024-03-22 13:11:29 +08:00
8 lines
82 B
ObjectPascal
8 lines
82 B
ObjectPascal
|
program ex;
|
||
|
|
var n:longint;
|
||
|
|
begin //main
|
||
|
|
read(n);
|
||
|
|
inc(n); n:=n*n-1;
|
||
|
|
write(n);
|
||
|
|
end.
|