T
tear_viem_tear
[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!
ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.
[Pascal] Giúp e tìm công thức truy hồi 
hjxhjx, sắp thi rồi, ráng học cái quy hoạch động mà mới học cái công thức truy hồi hàz e lớp 7, có 1 bài pascal, em giải theo quy hoạch động, e đã lưu kết quả vào mảng rồi nhưng chưa tìm ra được công thức để truy hồi
Đề: Nhập vào hai xâu X và Y, tìm xâu con dài nhất của hai xâu X và Y (xâu S được gọi là xâu con của xâu T nếu như ta xoá 1 số ký tự của T thì tìm đc xâu S)
ví dụ:
inp: X='abcdefghi123'
Y='abc1def2ghi3'
out: 'abcdefghi3
inp: X='ABACAF17J'
Y='1BCAFF718AB'
out: 'BCAF7'
Đoạn code em làm để lưu lại là:
p/s: giúp e công thức để truy hồi là đc oy`
hjxhjx, sắp thi rồi, ráng học cái quy hoạch động mà mới học cái công thức truy hồi hàz
e lớp 7, có 1 bài pascal, em giải theo quy hoạch động, e đã lưu kết quả vào mảng rồi nhưng chưa tìm ra được công thức để truy hồi Đề: Nhập vào hai xâu X và Y, tìm xâu con dài nhất của hai xâu X và Y (xâu S được gọi là xâu con của xâu T nếu như ta xoá 1 số ký tự của T thì tìm đc xâu S)
ví dụ:
inp: X='abcdefghi123'
Y='abc1def2ghi3'
out: 'abcdefghi3
inp: X='ABACAF17J'
Y='1BCAFF718AB'
out: 'BCAF7'
Đoạn code em làm để lưu lại là:
Mã:
[SIZE="3"][FONT="Courier New"][COLOR="DarkOrange"]for i:=1 to length(x) do
begin
max:=kq[i-1,0];
for j:=1 to length(y) do
begin
max:=sosanh(max,kq[i-1,j-1]); ---> hàm sosanh là để tìm số lớn hơn trong 2 tham số
if x[i]=y[j] then kq[i,j]:=max+1 else kq[i,j]:=kq[i-1,j];
end;
end;[/COLOR][/FONT][/SIZE]p/s: giúp e công thức để truy hồi là đc oy`
Last edited by a moderator: