Напишите программку для решения задачки с клавиатуры вводится целое 2-значное число

Напишите программку для решения задачки с клавиатуры вводится целое 2-значное число ,если число положительное то полочить новое число Z c перестановкой цифр исходного числа и вывести число Z на экран div и mod

Задать свой вопрос
Pashok
Язык?
Колька Светашков
Язык
Альбина Корнвейц
paskal
1 ответ

PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger;

 if n gt; 0 then

 begin

   var z := 10 * (n mod 10) + n div 10;

   z.Println

 end

end.

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


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

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

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

Войти на сайт