Question

дано число часов H. Напишите программу, которая находит и выводит на экран количество полных дней и оставшихся часов.
паскаль........
срочно решение

Answer 1

var

 H: Integer;

begin

 Write ('Введите количество часов: ');

 ReadLn (H);

 WriteLn ('Полных дней = ', H div 24);

 WriteLn ('Оставшиеся часы = ', H mod 24);

end.

Answer 2

спасибо

Answer 3

почему у меня на компьютере выводит . Введите кол во часов

Answer 4

мне же еще дней надо

Answer 5

Инструкция к программе: введите количество часов, нажмите Enter, программа выведет количество полных дней и оставшиеся часы.