Составьте программу, которая для произвольного натурального двузначного числа определяет сумму и произведение его цифр;

• var a,sum,p:integer;
• begin
• read\(a\);
• sum:=a div 10 + a mod 10;
• p:=\(a div 10\) * \(a mod 10\);
• writeln\('Сумма цифр числа =',sum\);
• writeln\('Произведение цифр числа =',p\);
• end.