Запишите на языке Паскаль программу которая для произвольного натурального двузначного числа определяет сумму и произведение его цифр.Нужно сделать по вот этому примеру​.ОЧЕНЬ НУЖНО ПОМОГИТЕ

var

x,a, b: integer;

begin

readln (x);

a:= x div 10;

b:= x mod 10;

writeln ('сумма=', a+b);

writeln( ' произведение =', a*b);

end.