Дано трехзначное целое число. Отыскать сумму его цифр и выдать это

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

Задать свой вопрос
1 ответ

var

 x, n1, n2, n3: integer;

begin

 Print('Введите трёхзначное целое число:');

 read(x);

 n1 := x div 100;

 n2 := (x div 10) mod 10;

 n3 := x mod 10;

 Println('Сумма цифр одинакова:', n1 + n2 + n3);

 Println('Перевёрнутое число:', n3 * 100 + n2 * 10 + n1);

end.


, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт