Question

Bài 4. Số chính phương                                                              tên file: chinhphuong.***

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".

Ví dụ:

Input	Output
4	yes
8	no

giúp mk vứi ạ cần gấp ạ :<

Answer 1

uses crt;

var n:integer;

begin

clrscr;

readln(n);

if trunc(sqrt(n))=sqrt(n) then writeln('yes')

else writeln('no');

readln;

end.