Дано четырехзначное натуральное число.Определить является ли сумма первой и последней цифр кратной 3 Паскаль

Дано четырехзначное натуральное число.Определить является ли сумма первой и последней цифр кратной 3 Паскаль
Гость
Ответ(ы) на вопрос:
Гость
var   iNum: integer; begin   readln(iNum);   writeln((((iNum mod 10) + (iNum div 1000)) mod 3 = 0) ? 'Yes' : 'No'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы