P2758 编辑距离

P2758 编辑距离

题目描述

设A和B是两个字符串。我们要用最少的字符操作次数，将字符串A转换为字符串B。这里所说的字符操作共有三种：

1、删除一个字符；

2、插入一个字符；

3、将一个字符改为另一个字符；

！皆为小写字母！

输入输出格式

输入格式：

第一行为字符串A；第二行为字符串B；字符串A和B的长度均小于2000。

输出格式：

只有一个正整数，为最少字符操作次数。

输入输出样例

输入样例#1：

sfdqxbw                  
gfdgw

输出样例#1：

4

 

 

 

 

 

var

 f:array[0..2000,0..2000]of longint;//f[i,j]为第i个数到第j个数的最短的编辑距离

 s,ss:ansistring;

 i,j,k,len,len2:longint;

function min(a,b:longint):longint;

 begin

 if a<b then exit(a);

 exit(b);

 end;

begin

 readln(s);

 readln(ss);

 len:=length(s);

 len2:=length(ss);

 for i:=1 to len do f[i,0]:=i;//不改任何东西最短距离就是它自己咯

 for i:=1 to len2 do f[0,i]:=i;//同上

 for i:=1 to len do

  for j:=1 to len2 do

   if s[i]=ss[j] then f[i,j]:=f[i-1,j-1]//相同的话就不用改啦

                 else f[i,j]:=min(min(f[i-1,j]+1,f[i,j-1]+1),f[i-1,j-1]+1);

 writeln(f[len,len2]);

end.