дано двузначное число(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.