tin học 10

T

tpgionhe

$\fbox{?}$ Nhập vào N và kiểm tra xem N có phải là số chính phương hay không?
Chào bạn bạn tham khảo code bên dưới nhé:

program check_so_chinh_phuong;
uses crt;
var n: integer;
begin
clrscr {Cái này dùng xóa màn hình thôi không có gì đặc biệt}
write('Nhập vào số cần kiểm tra:'); readln(n); { Cái này cho người dùng input}
if sqr(sqrt(n))=nthen
wite('N la so chinh phuong')
else
write('N khong phai la so chinh phuong');
readln;
end.

>>> Chúc bạn học tốt :p;):(:):D
 
Top Bottom