Написать программу в решить с использованием процедур. указать выделенные , решаемые процедурами. последовательность хейеса. дано натуральное число n (n > 1). если оно чётно, то его делят на 2, иначе умножают на 3 и прибавляют 1. если полученное число не равно 1, то действия повторяются до тех пор, пока не получится 1. вершиной называют наибольшее число в получающейся последовательности. для заданного n построить указанную последовательность, указать её вершину и количество шагов
254
455
Ответы на вопрос:
//pascal abc.net 3.1 сборка 1219 var k,n,max: integer; procedure hase(var k,n,max: integer); //сама последовательность begin if not(odd(n)) then n: =n div 2 else n: =n*3+1; //условие про чётность writeln(n); //вывод нового члена последовательности inc(k); //увеличение значения счётчика шагов if max< n then max: =n; //поиск вершины end; procedure start(var k,n,max: integer); //название процедуры намекает begin readln(n); k: =0; writeln('seq: '); max: =integer.minvalue; while n< > 1 do hase(k,n,max); writeln('шаги: ',k); writeln('вершина: ',max); end; begin start(k,n,max); end. пример ввода: 6 пример вывода: seq: 3 10 5 16 8 4 2 1 шаги: 8 вершина: 16
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
jansayabektasova12.10.2022 23:12
-
двоишник5301.01.2020 09:50
-
kositskaya8023.05.2020 00:03
-
mashacat763p01bj930.06.2020 04:48
-
555Sofiya555525.09.2022 21:04
-
nastiaandreeva26.08.2022 13:22
-
VIGOMIC28.03.2020 23:38
-
AnnaKor1421.09.2022 04:03
-
eromadima24.05.2023 12:25
-
kkalipso01.08.2022 10:23
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.