Var K, M, H: longint;
Begin
WriteLn('Введите номер секунды');
ReadLn(K);
H:=K div 3600;
M:=(K-H*3600) div 60;
K:=K-H*3600-M*60;
WriteLn('Прошло часов: ', H, '; минут: ', M, '; секунд: ', K);
Sleep(5000);
End.
Программа в файле. Если температура выше 37.5, то рекомендует остаться дома. Если меньше 37.5, но больше 36.9, то выводит, что лучше выпить таблетку. Если температура меньше 36.9, то выводит, что ты здоров.
Ответ:
Объяснение:
ответ на фото..............
Oперация a mod b возвращает остаток от деления a на b.
8 / 5 = 1 и 3 в остатке, поэтому ответом будет 3.
Другими словами, мы пишем дробь 8/5, выделяем целую часть, получая значение 1 3/5 и числитель 3 является результатом.
Ответ: 3