Решите в паскале ABC . Известно время полета вылета самолета…

Решите в паскале ABC . Известно время полета вылета самолета — HH часов и ММ минут, а также продолжительность полета (НР часов и МР минут). Напечатать время прибытия самолета в аэропорт назначения в виде: самолет прибывает в 12,35. Учесть возможность перехода часов (после 23,59 наступает 00,00).

в избранное

jarmush18

28 июля 2022

Program time; uses crt; varHH,MM,HP,MP,HR,MR,ost: integer; beginwrite ('Vvedite vremya otvravki: '); read (HH); read (MM); writeln; write ('vvedite prodolgitelnost poleta: '); read (hp); read (mp); clrscr; writeln ('Otpravleniye somolyata v ',hh,': ',mm); MR: =mm+mp; if mr>59 then begin ost: =mr mod 60; MR: =ost; HR: =HR+(MR div 60); end; HR: =HH+HP; if hr>24 then hr: =hr — 24; Writeln; Write ('Pributie samolyota v ', HR,': ',MR); writeln; end. Данный можно сразу вводить через пробел… например 12 10 жмем ентер и вводим другие 14 55 и ентер и все прекрасно посчитает. Тут опечатка… не совсем правильно считает… подожди исправлю

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?