Мальчик решил почистить аквариум. начал с переселения рыб в банку. семейство рыб составляла 30 штук. первую рыбку он поймал за 5 секунд и 2 секунды потратил на переклатывание. но чем меньше становлось рыбок, тем труднее их было...

Мальчик решил почистить аквариум. начал с переселения рыб в банку. семейство рыб составляла 30 штук. первую рыбку он поймал за 5 секунд и 2 секунды потратил на переклатывание. но чем меньше становлось рыбок, тем труднее их было поймать. на каждую следующую рыбку он тратил на 5% времени больше, чем на предыдущую. постройте модель переселения рыбок
Гость
Ответ(ы) на вопрос:
Гость
var a:array [1..30] of integer; i:integer; BEGIN   for i := 1 to 30 do   begin      a[i]:= 5+5*0.05*(i-1)+2;      writeln(a[i]);   end. END.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы