用动态规划嘛

也可以用贪心解决：
Program Delete_digit;
　　Var  n:string;{n是由键盘输入的高精度正整数}
　　　　 s,a,b,c:byte;{s是所要删除的数字的个数}
begin
　　readln(n);　　　readln(s);
　　for a:=1 to s do
　　　　for b:=1 to length(n) do 
if b<>length(n) then
           begin if n[b]>n[b+1] then  begin delete(n,b,1);break; end  end
                              else  delete(n,b,1);
writeln(n);
end. 

if b<>length(n) then
           begin if n[b]>n[b+1] then  begin delete(n,b,1);break; end  end
                              else  delete(n,b,1);
这句是什么意思啊

什么是动态规划啊???加我QQ:529828394...注明PASCAL

动态规划