Есть ответ 👍

Втаблице dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (dat[1] — количество самолётов первого числа, dat[2] — количество самолётов второго числа и т. определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на трёх алгоритмических языках. var k, m, day: integer; dat: of integer; begin dat[1] : = 2; dat[2] : = 2; dat[3] : = 3; dat[4] : = 3; dat[5] : = 2; dat[6] : = 2; dat[7] : = 5; dat[8] : = 5; dat[9] : = 6; dat[10] : = 6; day: =1; m : = dat[1]; for k : = 2 to 10 do if dat[k] =< m then begin m: = dat[k]; day : = k; end; write(day); end. объясните по подробнее

212
442
Посмотреть ответы 3

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


До работы цикла переменной  day присваиваем 1 (в конце он будет равен номеру дня-  day : = k, полученному врез. выполнения программы). переменной  m присваиваем значение 1-го дня=2. затем начинаем сравнивать значения  dat[k] =< m , начиная с  k : = 2 до 10,  если условие верно,  m: присваиваем значение  dat[k],  day : = k.1 шаг сравниваем  dat[k] =< m (dat[2]( а это  2) =< 2да, верно  m: =2,   day : =2.2 шаг 3  =<   2 нет,   оставляем  m: =2,   day : =23 шаг 3  =<   2 нет,  m: =2,   day : =24 шаг 2  =<   2  , да,  m: =2,  day : =5 5 шаг 2  =<   2 , да,    m: =2,   day : =6 6 шаг 5  =<   2 нет,  m: =2,   day : =67 шаг  5  =<   2 нет,  m: =2,   day : =6 8 шаг 6  =<   2 нет,  m: =2,   day : =6 9 шаг  6  =<   2 нет,  m: =2,   day : =6 на экране будет число 6 ( write(day))
LiNkoLine
4,6(1 оценок)

Будет напечатан день декады, в который вылетело меньше  всего самолетов. причем если таких дней несколько будет выбран последний из них. в нашем случае это 6. ниже в программе после // написано пояснение к нижеследующему коду. var k, m, day: integer;   dat: of integer; begin  // здесь определяются  значения элементов массиа dat - количество самолетов за каждый день декады dat[1] : = 2;   dat[2] : = 2; dat[3] : = 3;   dat[4] : = 3;   dat[5] : = 2;   dat[6] : = 2;   dat[7] : = 5;   dat[8] : = 5;   dat[9] : = 6;   dat[10] : = 6;   //переменным день и m присваиваются начальные значения //переменная m предназначена для запоминания  промежуточного результата работы алгоритма.  day: =1; m : = dat[1];   //организуем цикл в котором каждый (начиная со второго) день сравнивается с текущим значением m в котором фиксируется каждый раз меньшая величина из двух сравниваемых  по количеству самолетов for k : = 2 to 10 do  //если кол-во самолетов в  текущий день (dat[k]) меньше или равно самому меньшему количеству самолетов за предыдущие дни ( мы помним, что m изначально  присвоили значение для первого то значение m меняем на значение  dat[k] и переменной  day  присваиваем номер этого дня if dat[k] =< m then  begin  m: = dat[k]; day : = k; end;   //после работы цикла выводим последнее значение day. т.е. номер дня, в котором вылетело меньше всего самолетов write(day);   end.
lipun2004
4,4(36 оценок)

братан я не знаю когда узнаю дам отвкт

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS