Question

1) В бригаде, работающей на уборке сена, имеется N косилок. Первая из них работала M часов, а каждая следующая на 10 минут больше, чем предыдущая. Сколько часов проработала вся бригада? Входные данные Выходные данные

15 10200
10

Answer 1

С проверочными данными сами разбирайтесь...

 //PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

begin 
  var a:=ArrFill(ReadInteger('n='),ReadInteger('m=')*60);
  Range(1,a.Length-1).ForEach(t->begin a[t]:=a[t-1]+10 end);
  a.Println; a.Sum.Println;
end.

Пример:
n= 5
m= 10
600 610 620 630 640
51 ч  40 мин