program ConvertMinutes; var minutes, hours, remainingMinutes: Integer; begin minutes := 150; hours := minutes div 60; remainingMinutes := minutes mod 60; writeln(minutes, ' минут = ', hours, ' часов и ', remainingMinutes, ' минут'); end.
После выполнения программы на экране будет выведено:
var
minutes, hours, remainingMinutes: Integer;
begin
minutes := 150;
hours := minutes div 60;
remainingMinutes := minutes mod 60;
writeln(minutes, ' минут = ', hours, ' часов и ', remainingMinutes, ' минут');
end.
После выполнения программы на экране будет выведено:
150 минут = 2 часов и 30 минут