Есть ответ 👍

Мальчик Стив решил посвятить летние каникулы рыбалке. Он хочет научиться ловить как мирную рыбу (на поплавок), так и хищную (на блесну). Стив почему-то уверен, что однажды использованная снасть не годится для повторной ловли, и просто дарит ее соседскому мальчишке, на следующий день используя новую оснастку. Для рыбалки он ежедневно будет оснащать ДВЕ свои удочки по принципу:

- пока это возможно, на одну удочку будет ставиться поплавочная снасть, а на другую – блесна;

- когда один из видов снасти закончится, Стив будет обе удочки оснащать одинаково (например, когда закончатся блесны, на обе удочки будет ставиться поплавковая оснастка);

- когда обе удочки сразу оснастить будет невозможно, Стив бросает рыбалку и начинает рисовать акварелью.

Вычислите количество дней, которые Стив проведет на рыбалке.

Входные данные

Даны два целых числа –Х (количество комплектов поплавковой снасти) и К (снасти с блесной).

Выходные данные

Выведите единственное целое число М, равное максимальному количеству дней, которые Стив будет рыбачить.

Пример:

1) Х = 3, К = 1 М = 2 (1 день: поплавок и блесна, 2 день: оба поплавка)

2) Х = 2, К = 3 М = 2 (1 и 2 дни: поплавок и блесна, на 3 день будет оснащена лишь одна удочка блесной)

3) Х = 7, К = 3 М = 5 (1-3 дни: поплавок и блесна, 4-5 дни: поплавки на обе удочки)
По возможности объясните

156
476
Посмотреть ответы 1

Ответы на вопрос:


Var   a: array [1..10] of byte;   i, k, n, t, x, max: byte;     //процедура вывода массива procedure writea(); var i : byte; begin  for i : = 1 to 10 do begin     write(a[i], chr(32));   end;   writeln(); end; //основная процедура begin  randomize;   for i : = 1 to 10 do begin     a[i] : = random(100);   end;   writea();   writeln('');   n : = 10;   while n > 1 do begin     for i : = n downto 1 do begin       if a[i] > max then begin max : = a[i]; x : = i end;     end;     t : = a[n];     a[n] : = max;     a[x] : = t;     dec(n);     max : = 0;     writea();   end;   writeln('');   writea(); end.- pascal abc.net, массив из  10 случайных чисел до 100 типа byte- результат работы программы следующий: 43 77 72 39 60 99 44 65 72 58  43 77 72 39 60 58 44 65 72 9943 72 72 39 60 58 44 65 77 9943 72 65 39 60 58 44 72 77 9943 44 65 39 60 58 72 72 77 9943 44 58 39 60 65 72 72 77 9943 44 58 39 60 65 72 72 77 9943 44 39 58 60 65 72 72 77 9943 39 44 58 60 65 72 72 77 9939 43 44 58 60 65 72 72 77 99  39 43 44 58 60 65 72 72 77 99 

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS