Решите вопрос жизни и смерти

1)2 детей переплывут первыми

2) 2 ой возвращается

3)забирает взрослого( сам высажевается

4)(взрослый высажевается)сын плывет за другим

5) они возвращаются

я пробовала у меня вышло 15 но возможны и другие варианты

var i,s,k: integer;

begin

for i: =-4 to -15 do begin

      inc(s,i); inc(k)

end;

write('ср арифм = ',s/k)

end.