program z1;
var t: integer;
begin
write('С начала суток секунд t = ');
readln(t);
writeln('Это составляет ',t div 3600,' часов ', t mod 3600 div 60,' минут ',t mod 3600 mod 60,' секунд')
end.
Объяснение:
div - целочисленное деление
mod - остаток от целочисленного деления
1 мин = 60 сек
1 час = 60 мин = 3600 сек
t div 3600 - сколько целых часов
t mod 3600 - сколько секунд осталось не считая целых часов
t mod 3600 div 60 - сколько целых минут
t mod 3600 mod 60 - сколько секунд осталось не считая целых часов и целых минут
Заменяем каждый разряд на код из таблицы.
Двоичная СС Восьмеричная СС
000 0
001 1
010 2
011 3
100 4
101 5
110 6
111 7
Получаем числа:
1024757520 (7) = 001000010100111101111101010000 (2)
1232400565 (7) = 001010011010100000000101110101 (2)
Складываем (0 в начале числа можно убрать):
1000010100111101111101010000 + 1010011010100000000101110101 = 10010101111011110000011000101
Меняем 1 на 0, 0 на 1:
10010101111011110000011000101 = 01101010000100001111100111010
Двоичная СС Шестнадцатеричная СС
0000 0
0001 1
0010 2
0011 3
0100 4
0101 5
0110 6
0111 7
1000 8
1001 9
1010 A
1011 B
1100 C
1101 D
1110 E
1111 F
Получаем число:
1101 0100 0010 0001 1111 0011 1010 (2) = D421F3A (16)
