Question

Số chính phương là một số nguyên dương bằng bình phương của một số nguyên dương. Ví dụ: 1, 4, 9, 16, 100 … là những số chính phương; còn 3, 8, 15 … không phải là những số chính phương.
Cho trước một số nguyên dương n. Em hãy kiểm tra xem n có phải là số chính phương không?
Input: Một dòng duy nhất chứa số nguyên dương n.
Output: Đưa ra thông báo "yes" nếu n là số chính phương, ngược lại thông báo "no".

Answer 1

const
fi='sochinhphuong.inp'
fo='sochinhphuong.out'
var f,g:text;n:longint;
function scp(n:longint):boolean;
begin
        if (sqr(trunc(sqrt(n)))=n) then exit (true);
        exit (false);
end;
begin
        assign(f,fi);reset(f);
        assign(g,fo);rewrite(g);
        readln(f,n);
        if scp(n) then writeln(g,'yes') else
        writeln(g,'no');
        close(f);close(g);
end.