Мальчик Вася делает домашнее задание за t минут. Написать программу на Pascal для определения: сколько бы ему понадобилось школьных уроков без перемен, чтобы выполнить это задание в школе.

Предыдущий
вопрос Следующий
вопрос

program SchoolLessons;
var
t, lessonTime, lessonsNeeded: Integer;
begin
writeln('Enter the time in minutes to complete the homework: ');
readln(t);
lessonTime := 45; // assume one school lesson lasts 45 minutes
lessonsNeeded := t div lessonTime;
if t mod lessonTime <> 0 then
lessonsNeeded := lessonsNeeded + 1;
writeln('Number of school lessons needed: ', lessonsNeeded);
end.

Программа запрашивает у пользователя время (в минутах), необходимое для выполнения домашнего задания (t), и определяет количество школьных уроков без перемен, которые понадобятся Васе, чтобы выполнить это задание в школе.