pascal 难题给出一个多位数N（不超过240位）,从中删除S个数字（不超过200的正整数）,要求删除后的N按原次序组成新数,使新数最小,输出最小的新数.样例：Delet.in23586490133Delet.out2349013(快!)1.免文

来源：学生作业帮助网编辑：作业帮时间：2024/05/17 09:15:38

pascal 难题给出一个多位数N（不超过240位）,从中删除S个数字（不超过200的正整数）,要求删除后的N按原次序组成新数,使新数最小,输出最小的新数.样例：Delet.in23586490133Delet.out2349013(快!)1.免文
pascal 难题
给出一个多位数N（不超过240位）,从中删除S个数字（不超过200的正整数）,要求删除后的N按原次序组成新数,使新数最小,输出最小的新数.
样例：
Delet.in
2358649013
3
Delet.out
2349013
(快!)
1.免文件输入输出.
2.要程序.

pascal 难题给出一个多位数N（不超过240位）,从中删除S个数字（不超过200的正整数）,要求删除后的N按原次序组成新数,使新数最小,输出最小的新数.样例：Delet.in23586490133Delet.out2349013(快!)1.免文
____这道题不妨用贪心的思想解决.
____我们可以从高到低考察原数的每一位,对于剩余的删除次数枚举删除的次数,可以不删.在所有的可能情况中选择删除后当前位最小的情况.如果有多种情况满足最优情况,则选择删除最少的.如果最终删除剩余次数大于零,则从数串末尾删除剩余的位数.最后输出.
附上pascal源程序,
var i,j,k,l,m,n,left,min,js:longint;
s,mid:string;
ch:char;
begin
readln(s);
readln(k);
left:=k;
n:=0;
for js:=1 to length(s) do
begin
min:=10;
inc(n);
for i:=0 to left do
begin
mid:=s;
delete(mid,n,i);
if ord(mid[n])-48

pascal 难题给出一个多位数N（不超过240位）,从中删除S个数字（不超过200的正整数）,要求删除后的N按原次序组成新数,使新数最小,输出最小的新数.样例：Delet.in23586490133Delet.out2349013(快!)1.免文产生数pascal程序给出一个整数n(n 数字平方和 pascal给出一个自然数N（1 给出整数n,接下来有n行,每行一个整数,求最小值用pascal做给出一个多位数N,从中删除S个数字,要求删除S个数字后,将剩下的数字按原左右次序组成一个新的正整数,使得剩下的数字组成的新数最小,输出这个最小的数.（用pascal）大大多的题目(PASCAL语言)1．给出一个自然数N（1 后n-1位数用pascal试题描述已知w是一个位数不大于1000的无符号整数,若w是n(n≥2)位的整数,则求出w的后n-1位的数.输入输入中包括一个无符号整数w.输出w对应的n-1位数（忽略前缀0）.如果除了最求一pascal程序,给出一个整数n,其中n小于等于10000,请统计n的因数的个数. 给出一个整数n,输出所有比n小的且是7的倍数的数用pascal做 pascal程序设计输入一个整数n,n pascal整数对问题考虑一个整数A(首位不为零),去掉它的任意一个数字后得到整数B（首位可能为零）,给出A与B的和N(10 给出一个数列4,7,10,13,16,19,22...,问这个数列的第n项是什么?pascal pascal 给出一个序列求出数列中相同数字出现的次数最多的数字和其出现次数 (n 给出数列:4,7,10,13,16,19,22,25...,再给出一个整数n,让你求出列前n项的和,用pascal解输入一个正整数N（注意：根据输入的N的值,来判断N的位数）,用while语句输出它的各位数字.pascal 语言给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和用pascal做 pascal编程给出一个n,求前n个奇数的总和输入一行,一个整数n 输出一行,表示总和给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和用pascal做