Bài 3 (4 điểm): Cho hai xâu X, Y chứa các kí tự số từ 0 đến 9 và được biểu diễn như
sau:
X = x
1
, x
2,
x
3
…x
n
; Y= y
1
, y
2,
y
3
…y
m
(n,m
250). Hãy viết chương trình tạo ra xâu ST
thoả mãn các điều kiện sau:
- Gồm các kí tự số vừa có mặt ở xâu X, vừa có mặt ở xâu Y;
- Các kí tự số trong xâu ST chỉ xuất hiện duy nhất một lần;
- Giá trị xâu ST nhận được là một số đạt giá trị lớn nhất.
Dữ liệu vào cho bởi file INPUT.INP chứa giá trị xâu X và xâu Y, mỗi xâu nằm trên một dòng.
Dữ liệu ra chứa ở file OUTPUT.OUT là số lớn nhất nhận được.
Ví dụ: Xâu X= ‘19012304’; xâu Y= ‘034012’, kết quả là 43210.
Thí sinh không được sử dụng tài liệu
Giám thị coi thi không giải thích thêm.
Program BT3;Var f,g:text; n,m,h,k:integer; x,y,st:string [250]; i:char;Procedure doi(var a,b:char);Var s:char;Begin s:=a; a:=b; b:=s;End; assign(f,'Input.inp'); reset(f); readln(f,x); readln(f,y); close(f); assign(g,'Output.out'); rewrite(g); for i:='0' to '9' do if (pos(i,x)<>0) and (pos(i,y)<>0) then st:=st+i; for h:=1 to length(st)-1 do for k:=h+1 to length(st) do if st[k]>st[h] then doi(st[h],st[k]); write(g,st); close(g);End.
