编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 9ms

├ 测试数据 10：答案正确... 41ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：50ms

没有秒杀，有点不爽......

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 06：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 07：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 08：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 09：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 10：答案错误...　├ 标准行输出

　├ 错误行输出

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：40 有效耗时：0ms

program P1680;

var

i,j,k:longint;

a,b:string;

f:array[0..2001,0..2001]of longint;

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

begin

min:=a;

if b

居然没有看题解就一次AC了！！！（兴奋中。。。）

Accepted 有效得分：100 有效耗时：271ms

我的程序太丑了。。。

var

tmp,i,j,k,a1,b1:longint;

a,b:array[0..2001] of char;

f:array[0..2001,0..2001] of longint;

begin

while not(eoln) do begin inc(a1);read(a[a1]); end;

readln();

while not(eoln) do begin inc(b1);read(b[b1]); end;

readln(k);

fillchar(f,sizeof(f),255);

for i:=0 to a1 do f:=k*i;

for i:=0 to b1 do f[0,i]:=k*i;

for i:=1 to a1 do

for j:=1 to b1 do begin

tmp:=maxlongint;

if f+k

真不敢相信...一次AC了额...

---|---|---|---|---|---|--

找人教我做这题的加强版..

http://acm.zju.edu.cn/onlinejudge/showProblem.do?problemId=1342

....

我好像目前只能过样例也...

水水~很健康撒

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 88ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 56ms

├ 测试数据 10：答案正确... 212ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：356ms

非常简单的DP，晒下我的程序。

滚动数组 AC

#include

#include

#include

using namespace std;

int dp[3][2001];

int mn (int a,int b,int c)

{

if(a>str2>>k;

int n=str1.size(),m=str2.size();

dp[0][0]=0;

for (j=1;j

AC 100 纪念

虽然是个water版DP题

通过人数不断的飙升……

不过貌似给大家增长信心的目的好像达到了o(∩_∩)o...哈哈

分析：好水的dp题

居然忘记了边界，可见我之沙茶

是经典dp

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

果然！！！！！！！！！！！！！！！！！！！！！

我这道题就遭在一个函数min上..

一开始 exit写成writeln

后头一只输出33 原来写成max了

var s1,s2:ansistring;

l1,l2,x:longint;

f:array[0..2000,0..2000] of longint;

g:array[1..2000,1..2000] of longint;

i,j:longint;

function min(v1,v2:longint):longint;

begin

if v1>v2 then exit(v2);

exit(v1);

end;

begin

readln(s1);

readln(s2);

readln(x);

l1:=length(s1);

l2:=length(s2);

for i:=1 to l1 do

f:=i*x;

for i:=1 to l2 do

f[0,i]:=i*x;

f[0,0]:=0;

for i:=1 to l1 do

for j:=1 to l2 do

f:=min(min(f+x,f+abs(ord(s1[i])-ord(s2[j]))),f+x);

writeln(f[l1,l2]);

end.

无奈 我的第一题

我受不了了 提交了5次 ，每一次在本机都通过了样例数据

第一次 没发现问题

第二次 发现有一个i写成了1

第三次 发现变量声明成了200而不是2000

第四次 发现用的是局部变量。。。

第五次 终于。。

不过还好 这不是考试

Flag 　　

题号 　　P1680

类型(?) 　　动态规划

通过 　　137人

提交 　　225次

通过率 　　61%

难度 　　1 囧

我交的题目居然不是我自己测的

杯具啊

果然水啊

连我这样的巨菜都找到了信心

Flag 　　Accepted

题号 　　P1680

类型(?) 　　动态规划

通过 　　110人

提交 　　172次

通过率 　　64%

难度 　　1

好囧~ ~110

我的思路是，

假设字符与空格搭配距离为0，则字符与字符搭配距离为原距离减去2*k；

最后结果再加上2*（m+n）就ok了