Viết chương trình nhập vào số nguyên lớn hơn 50. Nếu người dùng nhập số nhỏ hơn hoặc bằng 50 thì yêu cầu nhập lại.

0 bình luận về “Viết chương trình nhập vào số nguyên lớn hơn 50. Nếu người dùng nhập số nhỏ hơn hoặc bằng 50 thì yêu cầu nhập lại.”

1.         uses Crt;

           var i,n:integer;

          start

         Clrscr;

         repeat

          write(‘Nhap so n>50 ‘);

          readln(n);

         until n>50;

         end.

   Bình luận

2. uses crt;

   var i,n:integer;

   begin

         clrscr;

         Repeat

              write(‘Nhap so n>50: ‘);

              readln(n);

         until n>50;

   end.

   Bình luận