Ответы
Ответ дал:
0
var a:integer;
begin
Writeln('Введите целое число');
Readln(a);
if frac(a/3) > 0 then writeln('Число не кратно 3')
else Writeln('Число кратно 3')
end.
P.S. Frac - это дробная часть числа, в данном примере frac(a/3) это дробная часть числа а деленного на 3
begin
Writeln('Введите целое число');
Readln(a);
if frac(a/3) > 0 then writeln('Число не кратно 3')
else Writeln('Число кратно 3')
end.
P.S. Frac - это дробная часть числа, в данном примере frac(a/3) это дробная часть числа а деленного на 3
Ответ дал:
0
Я все же рекомендую использывать старый добрый Mod. Учителя любят прикопаться к какой-нибудь команде, которую они не объясняли.
Ответ дал:
0
с mod можно ошибиться на разных кратностях...а вот с frac точно не ошибиться...
Ответ дал:
0
У меня ошибок не возникало
Ответ дал:
0
Но Frac надежней
Ответ дал:
0
с mod запутываются когда остаток должен быть больше какого то числа, то будет кратное - именно в этом числе и ошибаются
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад