Ввести натуральное число `n`. Определить, является ли оно степенью числа `5`. Программа должна вывести ответ в виде «yes | no».

251

479

Посмотреть ответы 2

Ответы на вопрос:

maximbelov00

Информатика

4,6(98 оценок)

Чтобы гарантировать отсутствие ошибок от действий с вещественными числами, будем работать исключительно с целыми. Нам необходимо последовательно вычислять степени числа `5` и остановиться, когда мы получим степень, которая больше или равна введённому числу. Далее останется только сравнить на точное равенство. Приведём код программы.

var n,m:integer;

begin

readln(n);

m := 1;

while (m < n) do m := m*5;

if m = n

then writeln('yes')

else writeln('no');

end.

N30032004

Информатика

4,7(26 оценок)

The only thing that would have been the problem was to
Напишите блок схему program Array1;var a:array[1..10] of integer; N,i:Integer;begin Write('N:'); Rea