Viết chương trình thực hiện : nhập một số thực x, nếu x > 0 thì tính và in kết quả căn bậc 2 của x , nếu x <= 0 thì thông báo x không phải là số dương

0 bình luận về “Viết chương trình thực hiện : nhập một số thực x, nếu x > 0 thì tính và in kết quả căn bậc 2 của x , nếu x <= 0 thì thông báo x không phải là số dương”

1. program xxx;

   uses crt;

   var x : real;

   begin

   readln(x);

   if x>0 then writeln (sqr(x)) 

   else writeln (x,’ khong phai la so duong.’);

   readln;

   end.

   Bình luận