Уменя в выдает ответ с 0 (0008). : перевод из десятичной системы в восьмеричную в паскале, используя while. найдите ошибку. program zad3; var n, k: integer; begin read(n); while n > 0 do begin k : = 64; write (n div k); write (n mod 8); n: =n div 8; n: = n mod k; k: =k div 8; end; end.
245
380
Ответы на вопрос:
Исправил некоторые строки, добавил массив. вот что вышло. program zad3; var n,i,k: integer; mas : array [1..20] of integer; begin read(n); i: =1; while n > 0 do begin mas[i]: =n mod 8; n: =n div 8; i: =i+1; k: =k+1; end; for i: =k downto 1 do write(mas[i]) end.
Можно вот так: program zad3; var n, k, m: integer; begin write('n = '); readln(n); k: =1; while k< =n do k: =k*8; k: =k div 8; m: =n; while m > 7 do begin write (m div k); m: =m mod k; k: =k div 8; end; writeln(n mod 8); end. пример: n = 125175
Алгоритм последовательности следующий: для четных чисел (второе, четвертое, шестое и т.д.) - предыдущее число умножается на 2 и вычитается 1. для нечетных чисел (третье, пятое, седьмое и т.д) - предыдущее число умножается на 2 и прибавляется 1. таким образом можно продолжить последовательность: 1, 1*2-1=1, 1*2+1=3, 3*2-1=5, 5*2+1=11, 11*2-1=21, 21*2+1=43, 43*2-1=85, 85*2+1=171, 171*2-1=341, 341*2+1=683, 683*2-1=1365 и т.д.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Luky4anovadasha07.12.2022 00:42
-
алинка55414.03.2021 22:46
-
konoval1i15.10.2022 23:06
-
podynov880713.04.2021 13:11
-
Дженнет200116.01.2023 15:51
-
Пес2423.02.2021 03:33
-
Fakins04.04.2023 00:18
-
Игорь377317.03.2022 17:53
-
Vika1551118.02.2022 09:03
-
vano12512512510.01.2022 16:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.