Составте программу, вычисления суммы цифр трехзначного числа…

vara: integer; beginreadln (n); writeln ('Сумма цифр числа ',a,' равна', a div 100+(a mod 100) div 10+a mod 10); end. vara: integer; beginreadln (n); writeln (a mod 10)*100+(a mod 100) div 10)*10+a div 100); end.