ПОМОГИТЕ РЕШИТЬ В ПАСКАЛЕ.С ПОЛНЫМ РЕШЕНИЕМ!
Дано двузначное число. Найти:
а) число десятков в нем;
б) число единиц в нем;
в) сумму его цифр;
г) произведение его цифр.

var  n:integer;begin  Write('n='); Read(n);  Writeln('Десятков- ',n div 10);  Writeln('Единиц- ', n mod 10);  Writeln('Сумма цифр- ', n div 10+n mod 10);  Writeln('Произведение цифр- ', (n div 10)*(n mod 10))end.Тестовое решениеn=49Десятков- 4Единиц- 9Сумма цифр- 13Произведение цифр- 36