运动健将待遇:Pascal编程

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 06:25:42
1. 输入一个时、分、秒,把它转换为一个秒数。

要是三个人分的时候把平均分成分三份,而且分完时多余的糖果马上吃掉,那这个问题就很好解决了:
首先甲把50颗分成三份,每份16颗,余2颗吃掉,分两份给其他两个人,此时甲有16颗,乙有43+16=59颗,丙有13+16=29颗
然后乙把59颗分成三份,每份19颗,余2颗吃掉,分两份给其他两个人,此时乙有19颗,甲有16+19=35颗,丙有29+19=48颗
最后丙把48颗分成三份,每份16颗,余0颗吃掉,分两份给其他两个人,此时丙有16颗,甲有35+16=51颗,乙有19+16=35颗
要是还要继续分下去,只要用循环就行了

程序:
program lx;
var a,b,c:integer;
begin
read(a,b,c);
writeln(a*3600+b*60+c);
end.