请用Free Pascal解答以下3道题.我是一个小菜鸟.1、甲、乙、丙三人共有24元钱,先由甲分钱给乙、丙二人,所分给得数与各人已有的数相同；接着由乙分给丙、甲,分发同前；再有丙分钱给甲、乙,
来源：学生作业帮助网 编辑：六六作业网 时间：2024/12/18 20:47:43
请用Free Pascal解答以下3道题.我是一个小菜鸟.1、甲、乙、丙三人共有24元钱,先由甲分钱给乙、丙二人,所分给得数与各人已有的数相同；接着由乙分给丙、甲,分发同前；再有丙分钱给甲、乙,
请用Free Pascal解答以下3道题.我是一个小菜鸟.
1、甲、乙、丙三人共有24元钱,先由甲分钱给乙、丙二人,所分给得数与各人已有的数相同；接着由乙分给丙、甲,分发同前；再有丙分钱给甲、乙,分发亦同前.经上述三次分钱之后,每个人的钱数恰好一样多.求原先各人的钱数分别是多少?
2、甲、乙、丙分别有磁带36、48、64盒.先由甲把自己的磁带平均分为三份,分给甲、乙各一份,自己留下一份；接着是乙,最后是丙,都按甲的方法处理.变成输出甲、乙、丙在上述过程中各人的磁带数分别是多少?（输出所有的中间结果）
3、五位好朋友相聚.第一位朋友带来了很多糖块赠送给各位朋友,使每人的糖块在各自原有的基础上翻了一倍；接着第二位好友也同样向每人赠送糖块,他同样使每人的糖块在各人已有的数量上翻了一倍；第三、第四、第五位好友都照此办理.经过这样的赠送之后,每人的糖块恰好都为32块.问各位好友原先的糖块数分别是多少?
请用Free Pascal解答以下3道题.我是一个小菜鸟.1、甲、乙、丙三人共有24元钱,先由甲分钱给乙、丙二人,所分给得数与各人已有的数相同；接着由乙分给丙、甲,分发同前；再有丙分钱给甲、乙,
先打一下第二题：
var a,b,c,m:longint;
begin
a:=36 div 3;
b:=(48+a) div 3;
c:=(64+a+b) div 3;
writeln(a:4,48+a:4,64+a:4);
writeln(a+b:4,b:4,64+a+b:4);
writeln(a+b+c:4,b+c:4,c:4);
end.