Как решить такую задачу в паскале??
Дано двузначное число. Найти сумму его цифр.

var a,b,n:integer;beginreadln(n);a:=n mod 10;b:=n div 10;writeln(a+b);end.

program cymma;var  a, b, c: real;begin  writeln('Введите первую цифру числа');  read(a);  writeln('Введите вторую цифру числа');  readln(b);  c := a + b;  writeln('Сумма цифр числа =');  writeln(c);end.