diff options
Diffstat (limited to 'others/volume1/018.pas')
-rw-r--r-- | others/volume1/018.pas | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/others/volume1/018.pas b/others/volume1/018.pas new file mode 100644 index 0000000..05fd7e9 --- /dev/null +++ b/others/volume1/018.pas @@ -0,0 +1,11 @@ +var + n: int64; + +begin + readln(n); + if (n < 0) or + (sqr(trunc(sqrt(n))) <> n) then + writeln('NO') + else + writeln('YES') +end. |