早教吧作业答案频道 -->其他-->
求PASCAL小程序两道解法1.现有N堆纸牌,编号分别为1.2.3...N,每堆有若干张纸牌.但纸牌总数为N的倍数.可以在任意堆上取若干纸牌,然后移动到其他的堆上.移动规则:在开头1上取的纸牌,可以移动
题目详情
求PASCAL小程序两道解法
1.现有N堆纸牌,编号分别为1.2.3...N,每堆有若干张纸牌.但纸牌总数为N的倍数.可以在任意堆上取若干纸牌,然后移动到其他的堆上.
移动规则:在开头1上取的纸牌,可以移动到2上.在结尾N上取得纸牌,可以移动到N-1上.而在中间任意一堆上取得纸牌,可以移动到相邻的纸牌堆上.
现要求找出一种方法,用最少的移动次数使各堆上的纸牌数目相等.
2.给一个位数小于4位的正整数X,计算出最小正整数Y,使X于Y的积由1和0构成.
例:输入X=6,输出Y=185,输出X与Y之积1110.
忘了说了,第一题N大于一小于100
第二题吗,Y视N大小而定,N小于等于999大于等于1
1.现有N堆纸牌,编号分别为1.2.3...N,每堆有若干张纸牌.但纸牌总数为N的倍数.可以在任意堆上取若干纸牌,然后移动到其他的堆上.
移动规则:在开头1上取的纸牌,可以移动到2上.在结尾N上取得纸牌,可以移动到N-1上.而在中间任意一堆上取得纸牌,可以移动到相邻的纸牌堆上.
现要求找出一种方法,用最少的移动次数使各堆上的纸牌数目相等.
2.给一个位数小于4位的正整数X,计算出最小正整数Y,使X于Y的积由1和0构成.
例:输入X=6,输出Y=185,输出X与Y之积1110.
忘了说了,第一题N大于一小于100
第二题吗,Y视N大小而定,N小于等于999大于等于1
▼优质解答
答案和解析
到Pascal吧提提看 My code:Program program4;Var a:array[1..100] of integer;n,i,t,ad:integer;x:real;b:boolean;Function deng(arr:array of integer):boolean;var j:byte;begin deng:=true; for j:=2 to n do ...
看了求PASCAL小程序两道解法1...的网友还看了以下:
苏阿姨在编制一批中国结,计划每天编织7个,8天可以编制完,实际每天多编织2个,照这样的速度工作了4 2020-05-15 …
有两套牌,一副红牌,一副蓝牌,每副牌中分别有11张牌,分别写着1,2,4,8.1024这11个数, 2020-06-04 …
红星纺织厂4台编织机6.5小时编织了1823.25米布,平均每台编织机每小时可以编织多少米布?能把 2020-06-17 …
“巧妈妈”竹器编织组,8人3天可以编织144个精致竹篮,若每人每天编织的竹篮个数相同,则4人5天可 2020-07-02 …
“凑24点”游戏规则是:从一副扑克牌中抽去大小王剩下52张,(如果初练也可只用1~10这40张牌) 2020-07-08 …
你可以帮我编程一下魔术师的秘密吗?用vb来编程的在一次晚会上,一位魔术师掏出一叠扑克牌,取出其中13 2020-11-10 …
“巧算24点”的游戏内容如下:一副牌中抽去大小王剩下52张,(如果初练也可只用1~10这40张牌)任 2020-11-19 …
有两组相同的牌,每组两张,两张牌的牌面数字分别是4和5,从每组牌中各摸出一张称为一次试验,小明一共进 2020-12-21 …
有两组相同的牌,每组两张,两张牌的牌面数字分别是4和5,从每组牌中各摸出一张称为一次试验,小明一共进 2020-12-21 …
有21张牌排成一排,背面向上,甲乙两人轮流翻牌,规定:1、每张牌只能翻一次;2、每次翻一张或相邻两张 2020-12-21 …