Hãy lập chương trình cho người dùng gõ phím bất kỳ từ bàn phím và đưa thông báo phím vừa gõ là phím số, chữ cái, phép toán hay là ký tự khác P/s: Giúp

0 bình luận về “Hãy lập chương trình cho người dùng gõ phím bất kỳ từ bàn phím và đưa thông báo phím vừa gõ là phím số, chữ cái, phép toán hay là ký tự khác P/s: Giúp”

1. program kiem_tra;

   uses crt;

   var c:char;

   begin

          clrscr;

          write(‘Nhap phim: ‘);   readln(c);

          if c in [‘0’..’9′] then write(‘So’)

          else if (c in [‘a’..’z’]) or (c in [‘A’..’Z’]) then write(‘Chu cai’)

                 else if c in [‘+’,’-‘,’*’,’:’,’/’] then write(‘Pheps toan’)

          else write(‘Ki tu khac’);

          readln;

   end.

   Bình luận