В часах села батарейка, и они стали идти вдвое медленнее. Когда на часах было x1 часов y1 минут, правильное время было a1 часов b1 минут. Сколько времени будет на самом деле, когда часы в следующий раз покажут x2 часов y2 минут- QBasic(Бейсик)

disel
1
2
3
4
Формат входных данных:
Введите числа x1, y1, a1, b1, x2, y2 в указанном порядке. Все числа целые. Числа x1, a1, x2 — от 0 до 23, числа y1, b1, y2 — от 0 до 59.
Формат выходных данных:
Выведите два числа a2, b2, определяющие сколько будет времени на самом деле, когда на часах будет x2 часов y2 минут
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
X1 = 2
Y1 = 30 'na chasah pol tretiego
a1 = 5 'na moih rovno pyti
b1 = 0
 
X2 = 5 'kogda na chasah budet pyti
Y2 = 0
 
t1 = X1 * 60 + Y1
t2 = a1 * 60 + b1
t0 = 2 * t1 - t2
t3 = X2 * 60 + Y2
t_real = t3 * 2 - t0 + 1440
b2 = t_real MOD 60
a2 = (t_real \ 60) MOD 24
PRINT a2; ":"; b2

Следующий вариант

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
INPUT x1, y1, a1, b1, x2, y2
tc = x1 * 60 + y1
tr = a1 * 60 + b1
tn = x2 * 60 + y2
IF tn < tr THEN tn = tn + 24 * 60
IF tr < tc THEN tr = tr + 24 * 60
IF tn < tr THEN tn = tn + 24 * 60
raz = tr - tc
tnt = tc - raz
t = (tn - tnt) * 2
rez = tnt + t
a2 = (rez \ 60) MOD 24
b2 = rez MOD 60
PRINT "chasov="; a2; "minut="; b2
END

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment