На Pascal.Часовая стрелка повернулась с начала суток на d градусов. Вывести, сколько прошло с начала суток полных часов и минут. На вход программе подаётся целое число d от 0 до 360.
На Pascal.Часовая стрелка повернулась с начала суток на d градусов. Вывести, сколько прошло с начала суток полных часов и минут. На вход программе подаётся целое число d от 0 до 360.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program ClockRotation;
var
d, hours, minutes: integer;
begin
writeln('Enter the number of degrees the clock hand has rotated (from 0 to 360): ');
readln(d);
hours := d div 30; // 360 degrees in a circle, 12 hours on a clock => 30 degrees per hour
minutes := (d mod 30) * 2; // 1 hour = 60 minutes => 30 degrees = 60 minutes
writeln('Full hours passed: ', hours);
writeln('Minutes passed: ', minutes);
end.