Пожалуйста, срочно!
За два часа до обеденного перерыва 40 бабушек встали в очередь за пенсией. Кассир обслуживает клиента в среднем за 1 минуту. Первая бабушка мучила вопросами кассира 9 минут 15 секунд. Каждая следующая бабушка, "мотая на ус" ответы, адрессованные предыдущим бабушкам, мучает кассира на 12 секунд меньше. Сколько бабушек успеет обслужить кассир до перерыва?
More Questions From This User See All
Answers & Comments
всего 15 бабушек
var
i, summ, c:integer;
begin
i := 1;
c := 555 - 12;
summ := 555;
while summ < 7200 do
begin
summ := Summ + c;
c := c - 12;
inc(i);
end;
writeln('Summ = ', summ);
writeln('n = ', i - 1);
end.