Viết chương trình thực hiện:
– nhập chương trình bất kì hiển thị xâu và cho biết độ dài xâu.
Cho biết trong xâu có kí tự “hanh” hay ko
– nhập 2 xâu cho biết
Xâu nào dài hơn
Xâu nào ngắn hơn
Viết chương trình thực hiện:
– nhập chương trình bất kì hiển thị xâu và cho biết độ dài xâu.
Cho biết trong xâu có kí tự “hanh” hay ko
– nhập 2 xâu cho biết
Xâu nào dài hơn
Xâu nào ngắn hơn
uses crt;
var s1,s2: string;
begin
clrscr;
write (‘s1= ‘); readln (s1);
write (‘s2= ‘); readln (s2);
if length(s1)>length(s2) then write (‘xau 1 dai hon xau 2’);
if length(s1)<length(s2) then write (‘xau 1 ngan hon xau 2’);
if length(s1)=length(s2) then write (‘xau 1 bang xau 2’);
readln;
end.