Хм...видимо вопрос не правильный, у двузначного числа сумма цифр не может быть однозначным числом, только двузначным! вот тебе код Pascal: Код Pascal 1 2 3 4 5 6 7 8 9 var a,b,n,kod:integer; begin write('Введите двузначное число - '); readln(n); a:=n div 10; b:=n mod 10; if a+b>9 then writeln('Сума цифр двузначное число') else writeln('Сума не двузначное число'); end.
вот тебе код Pascal:
Код Pascal
1 2 3 4 5 6 7 8 9 var a,b,n,kod:integer;
begin
write('Введите двузначное число - ');
readln(n);
a:=n div 10;
b:=n
mod 10;
if a+b>9 then writeln('Сума цифр двузначное число')
else
writeln('Сума не двузначное число');
end.