Дано трехзначное целое число. Найти сумму его цифр и выдать это число в "перевернутом" виде ( было 123, выдать 321) Примечание. n1 - 1-я цифра исходного числа, n2 - вторая, n3- третья

Можно пожалуйста погрубее способ

Куда уж грубее? Делим, выделяем остатки, получаем цифру за цифрой и снова конструируем число. На практике так мало кто делает, куда проще число превратить в строку и прочитать ее в обратном порядке.

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger;

 var (n1, n2, n3) := (n div 100, n div 10 mod 10, n mod 10);

 Println('S =', n1 + n2 + n3, ', "перевертыш" ', 100 * n3 + 10 * n2 + n1)

end.

123S = 6 , "перевертыш"  321