Сделать из числа 123 число 312 в pascal

Сделать из числа 123 число 312 в pascal

Задать свой вопрос
1 ответ
var N1, N2 : Word; begin Write(Введите число: ); ReadLn(N1); N2 := 0; while N1 gt; 0 do begin N2 := N2 * 10 + N1 mod 10; N1 := N1 div 10; end; WriteLn(Перевёрнутый итог: , N2); end
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

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

Войти на сайт