Написать программу для паскаля. Сумма цифр двузначного числа a

program summa;var a,b : integer;begin write('Введите двухзначное число'); readln(a); b:= a div 10; a:= a mod 10; writeln('сумма цифр этого числа равна: ',b+a);end.