来帮忙做几个PASCAL的题 输入一个三位数的整数 ,将数字位置重新排列...

发布网友 发布时间：2天前

我来回答

共5个回答

热心网友 时间：2天前

分糖的问题可以用倒推法，如果要用程序，代码如下：
program aa;
var a,b,c,d,e:integer;
begin
a:=32;b:=32;c:=32;d:=32;e:=32;
e:=e+a div 2+b div 2+c div 2+d div 2;
a:=a div 2;
b:=b div 2;
c:=c div 2;
d:=d div 2;
d:=d+a div 2+b div 2+c div 2+e div 2;
a:=a div 2;
b:=b div 2;
c:=c div 2;
e:=e div 2;
c:=c+a div 2+b div 2+d div 2+e div 2;
a:=a div 2;
b:=b div 2;
d:=d div 2;
e:=e div 2;
b:=b+a div 2+c div 2+d div 2+e div 2;
a:=a+b div 2+c div 2+d div 2+e div 2;
b:=b div 2;
c:=c div 2;
d:=d div 2;
e:=e div 2;
writeln('a=',a,' b=',b,' c=',c,' d=',d,' e=',e);
end.

输入结果：a=121 b=41 c=42 d=22 e=12

热心网友 时间：2天前

货物的代码和重量是多少？

如果对您有帮助，请记得采纳为满意答案，谢谢！祝您生活愉快！

vaela

热心网友 时间：2天前

var a,b,c,d:integer;
begin
readln(a);
b:=a div 100;
c:=a div 10 mod 10;
d:=a mod 10;
writeln(d,c,b);
end.输入一个三位数的整数将数字位置重新排列,我只知道一个

热心网友 时间：2天前

编一个程序，使售货员只要从键盘输入货物的代码及重量，计算机便能显示货物 货物的代码和重量是多少？

热心网友 时间：2天前

5554rjgklggkflk