Язык программирования Pascal Поменять местами цифры хоть какого трехзначного числа и вывести

Язык программирования Pascal
Поменять местами числа любого трехзначного числа и вывести их на экран

Задать свой вопрос
Евгения Апшай
там необходимо через mod 10
Песчаненко Вера
Можешь написать а то я не понимаю
2 ответа
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программка не работает, обновите версию!

begin
  var n:=ReadInteger('Введите трехзначное число').ToString.Inverse.ToInteger;
  Writeln('n=',n)
end.

Пример
Введите трехзначное число 436
n=634

Program wk;
var x,a,b,c:integer;
begin
Readln(x);
A:=x mod 10;
b:=x div 100;
c:=(x div 10)mod 10;
x:=a*100+b*10+c;
Writeln(x);
Writeln(a,' ',b,' ',c);
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт