Втаблице 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
Ответы на вопрос:
До работы цикла переменной 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))
Будет напечатан день декады, в который вылетело меньше всего самолетов. причем если таких дней несколько будет выбран последний из них. в нашем случае это 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.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
guujutuuuu5610.05.2020 17:54
-
dudka28384722.11.2020 17:48
-
АнимешкаПельмешка20.09.2020 06:02
-
2006lSashal200616.01.2020 10:39
-
LenaED11.08.2021 18:49
-
lolipop10107.04.2023 19:27
-
Emil30425.01.2021 11:01
-
muradir110207.02.2022 20:24
-
baseke201813.05.2020 01:20
-
whitesquirrelp06pc023.10.2022 23:33
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.