t = int(input())
if t <= 3:
print("GREEN")
elif t <= 5:
print("RED")
elif t <= 8:
print("GREEN")
elif t <= 10:
print("RED")
elif t <= 13:
print("GREEN")
elif t <= 15:
print("GREEN")
elif t <= 18:
print("RED")
elif t <= 20:
print("GREEN")
elif t <= 23:
print("RED")
elif t <= 25:
print("GREEN")
elif t <= 28:
print("RED")
elif t <= 30:
print("GREEN")
elif t <= 33:
print("RED")
elif t <= 35:
print("GREEN")
elif t <= 38:
print("RED")
elif t <= 40:
print("GREEN")
elif t <= 43:
print("RED")
elif t <= 45:
print("GREEN")
elif t <= 48:
print("RED")
elif t <= 50:
print("GREEN")
elif t <= 53:
print("RED")
elif t <= 55:
print("GREEN")
elif t <= 58:
print("RED")
elif t <= 60:
print("GREEN")
0 ≤ T < 3 ⇒ зеленый
3 ≤ T < 4 ⇒ желтый
4 ≤ T < 6 ⇒ красный
2. Замечаем, что цикл смены состояний светофора составляет 6 секунд, т.е. взяв остаток от деления заданного T на 6, мы сведем задачу к состоянию, описанному в п.1
3. Операция "Взятие остатка от деления вещественного числа" в QBASIC отсутствует, поэтому будем получать некое k - целочисленное частное от деления T на 6, а потом переопределять T = T - 6*k
'Microsoft QBASIC 1.0
DIM T AS DOUBLE
INPUT "Введите T", T
T = T - 6 * INT(T / 6)
SELECT CASE T
CASE IS <= 3
PRINT "Зеленый"
CASE IS <= 4
PRINT "Желтый"
CASE ELSE
PRINT "Красный"
END SELECT