So sánh 2 xâu A=“học sinh” B=“học sinh 11”

0 bình luận về “So sánh 2 xâu A=“học sinh” B=“học sinh 11””

1. So sánh xâu trong pascal là so sánh mã ASCII của nó

   A=”hoc sinh”   B=”hoc sinh 11″

   Khi ta so sánh đến chứ h trong từ sinh thì nó vẫn bằng nhau, sau đó xâu A đã hết xâu mà xâu B vẫn còn nên xâu B lớn hơn xâu A.

   Bình luận

2. program phuongt;

   uses crt;

     var a, b: string;

           x, y: integer;

   begin

            clrscr;

            a:=’hoc sinh’;

            b:=’hoc sinh 11′;

            x:=length(a);

            y:=length(b);

            if x>y then write(‘Xau A co ki tu nhieu hon xau B’) else

                 if x<y then write(‘Xau B co ki tu nhieu hon xau A’) else

                        write(‘Hai xau A va B co ki tu bang nhau’);

            readln

   end.

   Bình luận