YOMEDIA
NONE

Viết chương trình nhập vào 2 phần tử cho biết 2 tử này có bao gồm kí tự của nhau hay không? ví dụ READ và DEAR là bao gồm ký tự của nhau

giúp e với gấp ạ

viết chương trình nhập vào 2 ptu. cho biết 2 tử này có bao gồm kí tự của nhau hay k? ví dụ READ và DEAR là bao gồm ký tự của nhau

Giusp e với ạ e tks

Theo dõi Vi phạm
ADSENSE

Trả lời (1)

  • Lon Ton Mèo Con

    program ctdt;
    uses crt;
    var s1,s2:string;
    dem,i,j:integer;
    (*--------------------*)
    BEGIN
    clrscr;
    write('nhap ptu1: ');readln(s1);
    write('nhap ptu2: ');readln(s2);


    {cach1:
    dem:=0;
    while i<=length(s1) do
    begin
    while j<=length(s2) do
    if s1[i]=s2[j] then
    begin
    dem:=dem+1;
    break;
    end
    else j:=j+1;
    i:=i+1;
    end;}


    {cach 2}
    dem:=0;
    for i:=1 to length(s1) do
    begin
    for j:=1 to length(s2) do
    if s1[i]=s2[j] then
    begin
    dem:=dem+1;
    end;
    end;

    if dem=length(s1) then
    write('hai ptu ,'s1,' , ',s2,' bao gom ki tu cua nhau')
    else write('hai ptu ,'s1,' , ',s2,' khong bao gom ki tu cua nhau');
    readln
    end.

      bởi Lon Ton Mèo Con 30/10/2018
    Like (0) Báo cáo sai phạm
Cách tích điểm HP

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
NONE

Các câu hỏi mới

AANETWORK
 

XEM NHANH CHƯƠNG TRÌNH LỚP 8

 

YOMEDIA
AANETWORK
OFF