Задание:
Дано двузначное число (n). Найти сумму цифр двузначного числа. Помогите сделать впаскале)
Решение:
Uses crt; var n,s,a,b: integer; beginwriteln ('Введите число n'); readln (n); a: =n mod 10; b: =n div 10; s: =a+b; writeln (s); end.
Знаете другой ответ?