zadach260.BAS

{* Задача260 *}

REM basic

' Расчет времени прибытия на станцию



CLS
INPUT "время прибытия на станцию А"; m, n
INPUT "время пути от станции А до станции Б"; k, t
If (m + k) < 24 And (n + t) < 60 Then
c = m + k
d = n + t
Else
If (m + k) > 24 And (n + t) > 60 Then
c = (m + k) - 24 + 1
d = (n + t) - 60
Else
If (m + k) > 24 And (n + t) < 60 Then
c = m + k - 24
d = n + t
Else
If (m + k) < 24 And (n + t) > 60 Then
c = m + k + 1
d = n + t - 60
End If
End If
End If
End If
PRINT "время прибытия на станцию Б"; c, d
End