Viết chương trình nhập vào 2 xâu kí tự từ bàn phím sau đó đưa ra màn hình xâu có đọ dài lớn hơn . Nếu bằng đưa ra xâu nhập trước

Viết chương trình nhập vào 2 xâu kí tự từ bàn phím sau đó đưa ra màn hình xâu có đọ dài lớn hơn . Nếu bằng đưa ra xâu nhập trước

0 bình luận về “Viết chương trình nhập vào 2 xâu kí tự từ bàn phím sau đó đưa ra màn hình xâu có đọ dài lớn hơn . Nếu bằng đưa ra xâu nhập trước”

  1. GIẢI THÍCH CÁC BƯỚC GIẢI

    PROGRAM SO_SANH;

    VAR s1, s2: string;

    BEGIN

    Writeln(‘Nhap vao xau thu nhat:’); Readln(s1);

    Writeln(‘Nhap vao xau thu nhat:’); Readln(s2);

    If length(s1) < length(s2) then Write(‘Xau ngan hon la:’,s1)

                                              Else Write(‘Xau ngan hon la:’,s2);

    Bình luận
  2. program xau;
    uses crt;
    var x1,x2 : string;
    begin clrscr;
    writeln(‘Nhap xau ki tu thu nhat :’); readln(x1);
    writeln(‘Nhap xau ki tu thu hai :’); readln(x2);
    if length(x1) > length(x1) then writeln(x1) else
    if length(x1) < length(x2) then writeln(x2) else
    writeln(x1);
    readln
    end.

    Bình luận

Viết một bình luận