Question

работа светофора для водителей запрограммирована так: в начале каждого часа в течение трёх минут горит зелёный сигнал,затем, в течение одной минуты-жёлтый,в течение двух минут-красный, в течение трёх минут опять горит зелёный и т.д.Дано вещественное число T,означающее время в минутах,прошедшее с начала очередного часа. Определить,сигнал какого цвета горит для водит. в этот момент.

Answer 1

var t:integer;

Begin

  read(t);

  while t > 6 do

    t:=t-6;

 

  case t of

    0..2: write('Green');

    3: write('Yellow');

    4..6: write('Red');

  end;

End.