Для заданного числа n распечатать числовую последовательность, в которой каждый следующий элемент последовательности определяется через предыдущий элемент р, и равен: вычисления прекратить, когда очередной элемент последовательности станет равен 1. (известно, что в любой такой последовательности рано или поздно встречается 1). входные данные: дано целое число n (1 ≤ n ≤ 100). выходные данные: в единственной строке вывести последовательность до 1. пример: входные данные выходные данные 7 7 22 11 34 17 52 26 13 40 20 10 5 16 8 4 2 1
160
252
Ответы на вопрос:
Буду считать что нечетные умножаются на 3 и прибавляется 1, четные делятся на 2 i, k, n: integer; a: array[1..10000] of integer; begin assign(input,'input.txt'); reset(input); assign(output,'output.txt); rewrite(output); read(n); a[1]: =n; k: =1; while a[k]< > 1 do if (a[k] div 2)=0 then begin a[k]: =a[k] div 2; k: =k+1; end else begin a[k]: =a[k]*3+1; k: =k+1; end; for i: =1 to k do write(a[i],' '); end.
//pascal abc.net 3.1 сборка 1219 var s,s1: string; i,n: integer; begin readln(s); i: =1; n: =length(s); while i< =n-1 do if s[i]=s[i+1] then begin s1: =s1+' '; i: =i+2; end else begin s1: =s1+s[i]; inc(i); end; s: =s1; writeln(s); end. пример ввода: 2 is ii, ascii is encoding. пример вывода: 2 is , asc is encoding.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
софилка29.05.2020 04:51
-
almazina118.07.2022 11:22
-
dolgorma119.07.2021 12:34
-
По564306.01.2020 07:28
-
Павви19.07.2022 17:04
-
nkaracheva03.06.2020 07:15
-
баке602.11.2021 21:17
-
lcjewfyjozo07530.05.2020 04:12
-
ta2001nja25.04.2021 05:29
-
ромкапомка118.03.2022 06:41
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.