Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Часы. Задача.

Автор: zhorik 5.01.2007 17:45

Задача:
Bвести с клавиатуры 2 целых числа: 0 <=H < 12, 0 <= M < 60, указывающие момент времени H часов M минут. Определить и вывести на экран наименьшее число полных минут, которое должно пройти до того момента, когда часовая и минутная стрелки на циферблате совпадут.

Обьясните, пожалуста, решение этой задачи.

Решение:

Код

program clock2;
uses
crt;
var
h,m,s,t:integer;
begin
clrscr;
textcolor(green);
Writeln('Vvedite chasi i minuti:');
readln(h,m);
t:=5*h-m+(h-1) div 2;
s:=((t div abs(t))+1) div 2;
t:=t+65*(1-s);
writeln('Strelki chasov sovpadut cherez: ',t, ' minut');
readln;
end.

Автор: volvo 5.01.2007 17:47

Ты откуда это решение взял? От Some1 ? Так он объяснял вроде вполне доступно, что надо делать, и ЗАЧЕМ...

Вот тут дело было: http://forum.sources.ru/index.php?showtopic=14936&view=findpost&p=125463