Вводится двузначное число с клавиатуры.Найти сумму цифр этого числа и проверить,является эта сумма четным числом или нет.Помогите пожалуйста:(
5-9 класс
|
var
n, sum :integer;
begin
readln(n);
sum:= (n div 10) + (n mod 10);
write(sum,' - ');
if sum mod 2 = 0 then
write('четная')
else
write('нечетная');
end.
Другие вопросы из категории
1. Заполнить двумерный массив размером ( 5, 11 ) целыми числами. Найти сумму положения элементов массива по главной диагонали. Вывести матрицу на экран.
2. Заполнить одномерный массив значением функции у=2 кв. корень из модуль х-2. Х=1,3,5...21. Вывести массив на экран в одну сторону. Найти сумму элементов массива.
Читайте также
или во втором сумма цифр этого числа будет равна 9.)
Пример ввода:567.
Пример вывода:сумма цифр числа 567-четное число
изведение всех цифр этого числа а так же колличество больших шестии
После этого компьютер должен напечатать текст ЗАДАЧА РЕШЕНА.
22. В компьютер вводятся длины трех отрезков. Компьютер должен ответить на вопрос, правда ли, что пер-вый отрезок не слишком длинен, чтобы образовать с другими двумя отрезками треугольник. Указание: Для этого его длина должна быть меньше суммы длин двух других отрезков. Замечание: Пока не думайте о том, что слишком длинными могут быть второй или третий отрезки. Об этом – задание из 5.5.