Привет всем! Помогите пожалуйста, времени мало…

57

Привет всем! Помогите пожалуйста, времени мало… дано целое число m>1. Получить наибольшее целое k, при котором 4^k (четыре в степени k)

категория: информатика

ответить

в избранное

69

coo113r

12 марта 2023

4^k < m. Представим m как 4^log (4) m. (Это выражение равно m (по основному логарифмическому тождеству) , 4 — основание логарифма).4^k < 4^log (4) m.k < log (4) m. Т. Е по идее получается, что наибольшее целое k=log (4) m с отбрасывание дробной части. Сам код: var m: integer; k: real; begin write ('m='); readln (m); k: =ln (m) /ln (4); {вычисляем логарифм m по основанию 4} write ('k=',int (k); {выводим целую часть}end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Другие вопросы по информатике

12 марта 2023

Delphi 7. Возник вопрос. Я пишу программу, где возникает сразу несколько MessageDlg. Ну что-то типа вируса, но с благородными целями (не подумайтеплохо). Разумеется надо как-то выйти/закрыть программу. Я например делал onKeyDown на форме (if key=40 then close). Так же делал вместо close использовал halt. Не получалось т.к. messageDlg как будто берет управление на себя.

12 марта 2023

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] – заданий сделал первыйученикDat[2] – второй ученик и т.д.). Определите, что будет напечатано врезультате работы следующей программы. Алгоритмическийязыкалгначцелтаб Dat[1:11]цел k, mDat[1]: =20; Dat[2]: =25Dat[3]: =19; Dat[4]: =25Dat[5]: =26; Dat[6]: =22Dat[7]: =24; Dat[8]: =28Dat[9]: =26; Dat[10]: =21Dat[11]: =27m: =30 нц для k от 1 до 11 если Dat[k] < m тоm: =Dat[k]всекцвывод mкон

12 марта 2023

Объясните как делать В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] – заданий сделал первый ученик Dat[2] –второй ученик и т.д.). Определите, что будет напечатано в результате работы следующей программы.

12 марта 2023

Скорость передачи данных через ADSL-соединение равна 256000 бит/c. Передача файла через данное соединение заняла 16 секунд. Определитеразмер файла в Кбайт.

12 марта 2023

Когда турист проехал 0,35 всего пути ему осталось проехать к середине 7,5 км. Найти длину всегопути

12 марта 2023

Согласно рекомендации классного руководителя, Дамир должен был выполнить такой объем работы, что на сон времени вообще не остается. Поэтому работадолжна выполняться не вся. Если первая работа занимает 1 объем времени, вторая -2 объема, третья 4, четвертая 8 и т.д., то какие работы надо выбрать, что бы выполнить работу объемом N?

12 марта 2023

Сказать, сообщить- значит… передать информацию, сохранить информацию Какой правильныйответ

12 марта 2023

1. Даны 3 числа, найти меньшее. 2. Дано число n-кг, найти количество полных тонн. 3. Даны 3 точки по своему координату ху, определить могутли они быть вершинами треуголника, если да, найти Р и S, если нет, обьявить об этом в сообщении.

12 марта 2023

Помогите пожалуйста. Придумайте различные способы соединения в сеть четырех компьютеров-серверов. Найдите способ обеспечивающий самый короткий маршрутпередачи информации между двумя любыми пользователями.

Задайте свой вопрос

ПОПУЛЯРНОЕ

portamix, 12 марта 2023

Delphi 7. Возник вопрос. Я пишу программу, где возникает сразу несколько MessageDlg

endilog, 12 марта 2023

В таблице Dat хранятся данные о количестве сделанных учениками заданий

virall, 12 марта 2023

Объясните как делать В таблице Dat хранятся данные о количестве сделанных учениками заданий

larrytroy91, 12 марта 2023

Скорость передачи данных через ADSL-соединение равна 256000 бит/c

svetlana1981, 12 марта 2023

Когда турист проехал 0,35 всего пути ему осталось проехать к середине 7,5 км. Найти длину всегопути?

ikiru, 12 марта 2023

Согласно рекомендации классного руководителя, Дамир должен был выполнить такой объем работы…

shakethecake, 12 марта 2023

Сказать, сообщить- значит… передать информацию, сохранить информацию Какой правильныйответ

eto-kryto, 12 марта 2023

1. Даны 3 числа, найти меньшее. 2. Дано число n-кг, найти количество полных тонн.…

nurnur, 12 марта 2023

Помогите пожалуйста. Придумайте различные способы соединения в сеть четырех компьютеров-серверов

27400

14821

Английский язык

14216

Биология

7369

720

Экономика

18828

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

465

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...