41

Помогите написать программу на паскале…

anastasiya-sonko 16 марта 2023

Помогите написать программу на паскале АВС. Светофор переключается каждые 10 секунд. В 0 часов 0 минут 0 секунд горит зеленый. Какой цвет будет горетьчерез 4 часа 5 минут 23 секунды

категория: информатика

34

var timeInSec: integer; // время в секундах color, s, m, h: byte; begin h: =4; //часы m: =5; //минуты s: =23; //секунды timeInSec: =h*3600+m*60+s; //перевод времени в секунды color: =(timeInSec div 10) mod 3; {целочисленно делим на 10, чтобы узнать сколько раз светофор изменил цвет} {потом находим остаток деления на 3 (количество цветов), чтобы узнать какой сейчас цвет} case color of //вывод ответа 0: writeln ('Горит зеленый свет'); //0 — это зеленый свет 1: writeln ('Горит желтый свет'); //1 — это желтый свет 2: writeln ('Горит красный свет'); //2 — это крсный свет end; end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...