0
我想制定一个计划，当火车来a到b。
我有时间火车离开时间和旅行距离a到b的时间。
我需要帮助一个算法来查找是否该列车绕过24小时。
就像我得到这些时间：火车在20:55离开，乘火车时间 - 11:40。
结果应该是8:35，但我怎么能得到它？计算到达日期给出的出发日期和时间
program troleibusai;
var xxx:integer ;
f,g:text ;
a:real;
Begin
Assign(F,'train_times');
Reset(F);
Assign(G,'results.txt');
Rewrite(G);
Read(F,left_hour);
Read(F,left_minute);
Read(F,ride_hour);
Read(F,ride_minute);
继承人的代码。
[代码]程序troleibusai; var xxx：integer; f，g：文字; a：real; 开始 指定（F，'train_times'）; 复位（F）; 指定（G，'results.txt'）; 重写（G）; 阅读（F，left_hour）; 阅读（F，left_minute）; 阅读（F，ride_hour）; 阅读（F，ride_minute）; [/ code] – 2013-04-24 11:45:29
您确定只需要算法还是程序？如果它的代码可以帮助你，那么你应该说明你的Pascal版本。例如：freepascal – itsols 2013-04-24 11:47:23
在评论中显示您的代码不是理想的事情。请编辑您的问题并在其中插入代码。 – itsols 2013-04-24 11:48:12