• Белки спрятали в дупле N орехов. Каждый день они брали половину для себя и своих друзей. Если число орехов было нечетным, то они откладывали один орех в сторону, а остальные делили пополам, причём отложенный орех опять возвращали в дупло. Напишите программу, подсчитывающую, сколько орехов останется в мешке через К дней?

Ответы 1

  • var n,k,m,i:integer;beginwrite('n = ');readln(n);write('k = ');readln(k);m:=n;for i:=1 to k do m:=(m div 2)+(m mod 2);writeln('m = ',m);end.Пример:n = 1000k = 5m = 32
    • Автор:

      jaxonzifx
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years