1) дано целое положительное число n, не превосходящее 1000. необходимо определить, является ли это число степенью числа 7. то есть требуется определить, существует ли такое целое число к, что 7k =n, и вывести это число либо сообщение, что такого числа не существует. для решения этой ученик написал программу, но, к сожалению, его программа оказалась неверной. var n, k: integer; begin read(n); k : = 0; while n mod 7 = 0 do begin k : = k + n div 7; n : = n div 7; end; if n < = 7 then writeln(k) else writeln('he существует') end. последовательно выполните следующее. 1. напишите, что выведет эта программа при вводе числа 49. 2. пример числа, при вводе которого программа напечатает то, что требуется. 3. найдите в программе все ошибки (их может быть одна или несколько). для каждой ошибки выпишите строку, в которой она допущена, и эту же строку в исправленном виде.
213
257
Ответы на вопрос:
1) 8 2) 7 выведет 1 3) 11 строка, поменять на k : = k + 1; 14 строка заменить на if n = 1 then рабочий код var n, k: integer; begin read(n); k : = 0; while n mod 7 = 0 do begin k : = k + 1; n : = n div 7; end; if n = 1 then writeln(k) else writeln('he существует') end. правильное решение данной const divider = 7; var n: integer; k: real; begin read(n); k : = ln(n) / ln(divider); if round(k) = k then writeln(round(k)) else writeln('he существует'); end.
2^3< 11< 2^4 > 4 бита для кодировки одного из 11 возможных исходов 4*50=200 битов для записи 50 экспериментов ответ 200 битов (или 25 байтов)
Популярно: Информатика
-
mir3201.12.2020 03:02
-
KewaKewka14.04.2022 23:42
-
max500va17.04.2022 18:21
-
ainashka191928.04.2022 23:34
-
артемий145612.08.2020 01:10
-
danilkalmykov106.09.2022 19:38
-
Белоснежка33321.09.2020 22:48
-
vlad141725.10.2020 09:36
-
Svasik26915.03.2022 21:29
-
may1231223.11.2022 08:27