В бригаде, работающей на уборке сена, имеется N сенокосилок. Первая сенокосилка работала m часов, а каждая следующая на 10 минут больше, чем предыдущая. Сколько часов проработала вся бригада сенокосилок? - Pascal(Паскаль) - Справочник юного программиста Pascal/Delphi

for i := 1 to n - 1 do
  add := add + i;
MCount := n * m * 60 + add * 10;
writeln(floor(MCount / 60), ' часов ', MCount mod 60, ' минут ');