Рассчитайте количество часов, которое вы тратите на выполнение домашнего задания в день, если среднее количество предметов в день и среднее время (в минутах), затрачиваемое на подготовку к каждому предмету, запрашивается у пользователя вашей программы

var a, i: byte;      b, c: word;beginwrite('Введите среднее количество предметов в день: ');readln(a);c := 0;for i := 1 to a do begin   write('Сколько минут в среднем вы тратите на подготовку к предмету: ');   readln(b);   c := c + bend;write('Количество часов, которое вы тратите на выполнение домашнего задания в день: ', (c / 60));end.