СРОЧНО!!!
Задача PascalABC
Светофор для автомобиля.
Вводится время (до 60 минут). Зеленый горит 2 минуты; желтый горит минуту; красный горит 3 минуты. Определить какой свет горит в минуту t. T вводится вручную.
Ответы
Ответ дал:
0
Program hhh54;
var t: longint;
begin
read (t);
if ((t-1) mod 6 = 0) or ((t-2) mod 6 = 0) then write ('ЗЕЛЁНЫЙ')
else begin
if (t mod 3 = 0) and (t mod 6 <> 0) then write ('ЖЁЛТЫЙ')
else write ('КРАСНЫЙ');
end;
end.
var t: longint;
begin
read (t);
if ((t-1) mod 6 = 0) or ((t-2) mod 6 = 0) then write ('ЗЕЛЁНЫЙ')
else begin
if (t mod 3 = 0) and (t mod 6 <> 0) then write ('ЖЁЛТЫЙ')
else write ('КРАСНЫЙ');
end;
end.
Ответ дал:
0
Благодарю!!
Ответ дал:
0
всегда пожалуйста
Похожие вопросы
2 года назад
2 года назад
6 лет назад
9 лет назад
9 лет назад