tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано целое число n( 1).найдите
Дано целое число n(> 1).найдите наибольшее целое число k ,при котором выполнялось неравенство 3 в степени к
antnonova
3 24.05.2019 05:00
28
Ответы
CleverBoy17
20.06.2020 00:33
Var n,i,k,j:integer;
begin
readln(n);
i:=1;
j:=3;
while n>i do begin
i:=i*j;
k:=k+1;
end;
writeln(k-1);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
GangaMarie
12.04.2020 21:23
Разветвляющиеся алгоритмы в Паскале Напишите программу, определяющую наибольшее их двух чисел. Компьютер запрашивает два целых числа и выводит на экран то число, которое...
kornilovstas200
12.04.2020 21:23
Как изменить формат представления регрессионной линии? Возможно ли использование регрессионных зависимостей при решении задач по оптимизации ресурсов и запасов? Опишите...
go0d2312
12.04.2020 21:22
Указать КАКИЕ из перечисленных моделей являются математическими...
69Maxsim96
09.12.2021 17:38
Cоставить компьютерную программу на C++ с указанными входными данными и результатами для такой задачи: Есть колода из 52 карт. Сколькими можно вытащить 5 карт так, чтобы...
katesmile7
09.12.2021 17:40
Сообщение об устройствах, входящих в состав персонального компьютера , ЖЕЛАТЕЛЬНО РАЗВЁРНУТЫЙ ОТВЕТ...
ADAMREUS
06.09.2019 05:30
Что представляет собой обработка информации?...
vladagabriell
06.09.2019 05:20
Чем отличается текстовая информация от графической?...
perevuznik1
06.09.2019 05:20
Какой объем памяти компьютера занимает сообщение повторение- мать учения...
круичаррип
06.09.2019 05:20
101010 перевести в систему счисления с основанием 8...
unicorn337228
01.06.2019 12:10
1. какие из следующих предложений являются высказываниями? определите их истинность. 1.число 6 - четное. 2.посмотрите на доску. 3.все роботы являются машинами. 4.у каждой...
Популярные вопросы
.1.Коли було проголошено Українську державу на українських землях,...
2
ІВ ДО ТЬ Знайдіть зайве речення. Обґрунтуйте свій вибір. Визначте види...
3
Укажи минимальный объём памяти (в битах), достаточный для хранения...
1
Во дворе есть клумба с цветами, несколько деревьев и площадка, засеянная...
3
Dengeli Beslenme Sıralaması Lütfen Rardımcı Olun...
1
Назови категории геоэкологического районирования...
1
Психологический климат в коллективе - это среда... личности...
2
Із 600 кг мукалатури отримали 156 кг папіру. Скільки паперу отримають...
2
ІЗ РОМАНУ Р.ІВАНЧЕНКО «ЯРОСЛАВНИ» Човни наближалися до берега…Інгварові...
2
Даны множества А={1,2,3,4,5,6}, В={2,3,5,9,11}, С={1,6,11} найти: А∪В...
3
begin
readln(n);
i:=1;
j:=3;
while n>i do begin
i:=i*j;
k:=k+1;
end;
writeln(k-1);
end.