Вводится начало занятий h1 - часов, m1- минут, n- количество уроков, d- длительность уроков, p-длительность перемен (считаем, что все перемены одинаковой длительности). найти время окончания занятий: h2-часов, m2-минут.

Var h1,m1,n,d,p,h2,m2: integer; begin   write('начало занятий (часы, минуты): ');   readln(h1,m1);   write('количество уроков: ');   readln(n);   write('длительность уроков: ');   readln(d);   write('длительность перемен: ');   readln(p);   m2: =m1+n*d+(n-1)*p;   h2: =h1+m2 div 60;   m2: =m2 mod 60;   writeln('время окончания занятий: ',h2,' часов   ',m2,' минут'); end.начало занятий (часы, минуты): 9 30 количество уроков: 4 длительность уроков: 45 длительность перемен: 10 время окончания занятий: 13 часов   0 минут

Alt+F4
Файл - Выход
Нажать на крестик наверху справа
Через панель задач
Через диспетчер задач

Верен первый вариант ответа