
Keradar
7 год назад
Батырхан любит числа, которые без остатка делятся на число 3. К сожалению, для очень больших чисел он не может проверить должен ли он любить его или нет. Помогите ему написав программу, которая поможет ему
ОТВЕТЫ

Философов
Jul 15, 2019
// PascalABC.NET 3.2, сборка 1359 от 11.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var b:=BigInteger.Parse(ReadlnString(Введите натуральное число:));
Writeln(b mod 3=0Любить!:Не любить)
end.
Примеры
Введите натуральное число: 437698996754633421436470300745368495356906343236523233
Не любить
Введите натуральное число: 12345678901234567890123456789012345678901234567890
Любить!
// Внимание! Если программа не работает, обновите версию!
begin
var b:=BigInteger.Parse(ReadlnString(Введите натуральное число:));
Writeln(b mod 3=0Любить!:Не любить)
end.
Примеры
Введите натуральное число: 437698996754633421436470300745368495356906343236523233
Не любить
Введите натуральное число: 12345678901234567890123456789012345678901234567890
Любить!
270
Смежные вопросы: