Правильно ли решена задача (Сколько часов проработала вся бригада)

@Дарья_Дерр · Регистрация: 27.10.2013

Студворк — интернет-сервис помощи студентам

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

Pascal

 s:=0; for i:=1 to N do s:=s+m+(i-1)/6;
 
  s:=0; i:=1; while i<=N do begin s:=s+m+(i-1)/6; Inc(i); end;
 
  s:=0; i:=1; repeat s:=s+m+(i-1)/6; Inc(i); until i>N;

@Puporev · 16.02.2014, 19:14

Pascal

1
2
3

s:=m;
for i:=2 to N do
s:=s+m+(i-1)/10;

Опции темы