Информатика, опубликовано 2018-08-22 18:08:06 by Гость
Помогите пожалуйста (( Дано целое число N>1, найти наибольшее целое число K при котором выполняется неравенство 3К
Ответ оставил Гость
Program while_4;varN: integer;beginreadln(N);while N mod 3 = 0 do N := N div 3; // пока остаток от деления на 3 равен нулю, делим на 3.writeln(N = 1); // Выведет True или Falseend.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.