Question

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

Answer 1

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.

123

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