Предмет: Информатика,
автор: WildPenguin
Дана задача:
Определить является ли число N степенью числа 3 и вывести 'true' или 'false'.
Задача на мой взгяд решена, но по какой то причине не выводиться 'false'.Найдите ошибку.
Приложения:
Аноним:
Вот работающий вариант
n:integer;
r:boolean;
begin
Read(n);
repeat
r:=(n mod 3) <> 0;
n:=n div 3
until r or (n<=1);
Writeln(not r)
end.
Ответы
Автор ответа:
0
div это целая часть от деления
4 div 3 = 1
программа всегда закончит работу на единице
4 div 3 = 1
программа всегда закончит работу на единице
Похожие вопросы
Предмет: Английский язык,
автор: zimina31
Предмет: Русский язык,
автор: Kirillkobzev2005
Предмет: Русский язык,
автор: Ledix28
Предмет: Обществознание,
автор: iershov99
Предмет: Английский язык,
автор: ainura4668