Идёт k-я секунда суток. Разработайте программу, которая по введённой k-й секунде суток...

0 голосов
244 просмотров

Идёт k-я секунда суток. Разработайте программу, которая по введённой k-й секунде суток определяет, сколько целых часов h и целых минут m прошло с начала суток. Например, если k = 13 257 = 3 • 3600 40 • 60 57, то h = 3 и m = 40. Выведите на экран фразу: It is ... hours ... minutes. Вместо многоточий программа должна выводить значения h и m, отделяя их от слов ровно одним пробелом. Пример входных данных Пример выходных данных 13 257 It is 3 hours 40 minutes.


Информатика (12 баллов) | 244 просмотров
Дан 1 ответ
0 голосов

Var
k,m,h:integer;
    begin
         readln(k);
               writeln(k div 60, '  минут');
               writeln(k div 3600, '  часов');
end.

(98 баллов)