В трехзначном числе x зачеркнули его последнюю цифру. когда в оставшимся двузначном числе переставили цифры, а затем приписали к ним слева последнюю цифру числа x, то получилось число n. По заданному n найти число x (значение n вводится с клавиатуры, 1 меньше или равно n меньше или равно 99 и при этом число единиц в n не равно нулю) - Паскаль.

Question

Информатика

Генюха

2 декабря, 18:13

В трехзначном числе x зачеркнули его последнюю цифру. когда в оставшимся двузначном числе переставили цифры, а затем приписали к ним слева последнюю цифру числа x, то получилось число n. По заданному n найти число x (значение n вводится с клавиатуры, 1 меньше или равно n меньше или равно 99 и при этом число единиц в n не равно нулю) - Паскаль.

+3

Ответы (1)

Знаете ответ на вопрос?

Кикилия · Answer 1

Var

n, x:integer;

a, b, c:byte;

Begin

read (n) ;

c:=n div 100 mod 10;

b:=n div 10 mod 10;

a:=n div 1 mod 10;

x:=100*a+10*b+1*c;

write (x) ;

end.