OPTADS360
ATNETWORK
RANDOM
ON
YOMEDIA
Banner-Video
IN_IMAGE

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

  bởi Nguyễn Thanh Thảo 30/10/2018
AMBIENT-ADSENSE/lession_isads=0
QUẢNG CÁO
 

Câu trả lời (1)

  • 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
 
 

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

NONE
OFF

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