Идет какая-то секунда суток.определите сколько полных часов,полных минут и секунд прошло с начала суток

200

335

Посмотреть ответы 3

Ответы на вопрос:

mcfrank203

Информатика

4,5(36 оценок)

Var n,h,m,s: int32; begin write('n = '); readln(n); h: =n div 3600; m: =(n-h*3600) div 60; s: =n mod 60; writeln('h = ',h,' m = ',m,' s = ',s); end. пример: n = 55198h = 15 m = 19 s = 58

помощь155

Информатика

4,5(100 оценок)

В минуте 60 секунд. 1) разделить число на 3600.получим .целое число означает текущий час. если из задонного числа вычесть получившееся целое число умноженное на 3600 получим число секунд в текущих минутах. 2)это число необходимо разделить на 60. целое число будет означать текущую минуту. 3) вычитаем из оставшегося числа число минут умноженное на 60 получим текущую секунду. например задано число 66276. 1) 66276 / 3600 = 18,41 прошдло 18 часов. 18 * 3600 = 64800 66276 - 64800 = 1476 2) 1476 / 60 = 24,6 прошло 24 минуты. 24 * 60 = 1440 1476 -1440 = 36 ответ: 18 часов , 24 минуты, 36 секунд.

DianaSagatbekova

Информатика

4,6(53 оценок)

Uses crt; var x,y,x1,y1,x2,y2: integer; begin clrscr; writeln('задайте: x,y,x1,y1,x2,y2'); readln(x,y,x1,y1,x2,y2); if (abs(x-x1)+abs(x2-x)=abs(x2-x1)) and (abs(y-y1)+(abs(y2-y)=abs(y2-y1)) then writeln('точка принадлежит отрезку') else writelb('точка не пренадлежит отрезку') readln end.