balabina-Olesya
?>

Определите результат работы функции при входном значении, равном 123456: function qq(x: integer):integer; var i, s: integer; begin s:=0; for i:=1 to 3 do begin s := s + x mod 10; x := x div 10; end; qq := s; end;

Информатика

Ответы

dshi67orbru
Доступность (документа) — свойство документа, состоящее в том, что форма представления документа обеспечивает физическую возможность измерения заданных параметров этого представления документа (содержания, атрибутов, технологии) заданными средствами в заданных точках за конечное время. ценная и актуальная информация выражена непонятными словами, она может стать бесполезной. Информация становится понятной, если она выражена языком, на котором говорят те, кому предназначена эта информация. ПРИМЕРЫ: 1) Дошкольник спрашивает у старшеклассника: "Как светит лампочка?". В ответ слышит: "Существует две теории света – волновая и корпускулярная. Согласно первой …". 2) Объяснять материал на китайском языке.
kirillboytsov403

a = float(input())

print(a)

count = 0

while a != 1:

   if (a % 2 == 0 or a % 3 == 0):

       if (((a - 1) % 9 == 0) and a % 16 != 0):

           print(a - 1)

           a = (a - 1)/9

           print(a * 3)

           print(a)

           count += 3

       else:

           if ((a - 1) % 32 == 0):

               a = (a - 1)/32

               print(a * 32)

               print(a * 16)

               print(a * 8)

               print(a * 4)

               print(a * 2)

               print(a)

               count += 6

           if (a % 16 == 0):

               a = a/16

               print(a * 8)

               print(a * 4)

               print(a * 2)

               print(a)

               count += 4

           if (a % 16 != 0 and a % 2 == 0):

               a = a/2

               print(a)

               count += 1

           if (a % 9 == 0 or a % 3 == 0):

               a = a/3

               print(a)

               count += 1

   else:

       if a != 1:

           a = a - 1

           print(a)

           count += 1

       if a == 1:

           break

print(count)

В интернете также есть другое решение, где каждый раз считается минимальное значение при исполнении одной из трех операций, и в итоге производится операция, в результате которой число становится наименьшим. То решение неверно, потому что оно упускает многие моменты. Это решение наиболее оптимизировано. Тем не менее, я уверен, что есть сделать его еще более оптимизированным, и что я все же упустил какой-то момент. Особенно важно то, что если у нас число, к примеру, 28 (то есть вида 3^n + 1, в данном случае n = 3), то рациональнее отнять от него 1 и делить три раза на 3, чем сразу делить на 2. Если отнять 1 и делить на 3, то это займет всего 4 операции (28 -> 27 -> 9 -> 3 -> 1). А если на 2 (28 -> 14 -> 7 -> 6 -> 3 -> 2 -> 1), то целых 6 операций.

Но в случае с числами, вроде 1000000 (т.е с числами, которые делятся хотя бы на четвертую степень двойки 2^4 = 16), гораздо рациональнее сразу делить на 2, чем отнимать единицу и делить на 3. Я не буду расписывать полностью, но в случае деления на 3 потребуется 25 операций, а с делением на 2 - всего 19.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Определите результат работы функции при входном значении, равном 123456: function qq(x: integer):integer; var i, s: integer; begin s:=0; for i:=1 to 3 do begin s := s + x mod 10; x := x div 10; end; qq := s; end;
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

maslprod
gulyaizmailova
Valentina1520
Fedorovich309
Андреевна
borvalmok432
kristal1
mel9152480522
Natakarpova75732
Стефаниди
Маркина Ворошилина
Prostofil200790
mstapottery
f-d-a-14
twisty20075004