Question

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

Answer 1

var

 H: Integer;

begin

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

 ReadLn (H);

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

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

end.

Answer 2

Конечно! Вот пример программы на Pascal, которая решает данную задачу:

scssCopy code
program DaysAndHours;

var
  H, days, remainingHours: integer;

begin
  write('Введите количество часов: ');
  readln(H);
  
  days := H div 24; // количество полных дней
  remainingHours := H mod 24; // количество оставшихся часов
  
  writeln('Полных дней: ', days);
  writeln('Оставшихся часов: ', remainingHours);
  
end.

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

Надеюсь, это поможет!