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 ạ :<
Hi cả nhà! Mình đang hơi loay hoay với một câu hỏi khó nhằn. Bạn nào nhẹ nhàng, kiên nhẫn giúp mình với được không? Cảm ơn tất cả rất nhiều!

uses crt;

var n:integer;

begin

clrscr;

readln(n);

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

else writeln('no');

readln;

end.