Программа проверяющая верно ли утверждение что сумма цифр двузначного числа четное(на паскале)
Программа проверяющая верно ли утверждение что сумма цифр двузначного числа четное(на паскале)
Гость
Ответ(ы) на вопрос:
Гостьvar a,s:integer;
begin
write('a = ');
readln(a);
s:=a div 10 + a mod 10;
writeln('s = ',s);
if s mod 2 = 0
then writeln('Верно')
else writeln('Неверно');
end.
Пример:
a = 25
s = 7
Неверно
Не нашли ответ?
Похожие вопросы