40

Дано трехзначное число N. Проверить, будет ли сумма его цифр четным числом. Кто…

22 марта 2023

Дано трехзначное число N. Проверить, будет ли сумма его цифр четным числом. Кто может, напишите пожалуйста алгоритм решения для программыПаскаль

категория: информатика



65

Var a,b,c,k: integer; beginread (a); c: =10; b: =0; for k: =1 to 3 do beginb: =b+a mod c; c: =c+10; end; if (b mod 2=0) then write ('Norm') else write ('Nechetnoe'); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...