с (pascal)
как это решить? ?
в трехзначном числе x , зачеркнули 2-ую цифру , когда образовавшийся двухзначному числу приписали слева 2-ую цифру числа x ,что-бы получилось число x по заданному y найти число x

var

 X, Y, s, d, e: integer;

begin

 read(Y);

 d := Y div 100;

 s := Y div 10 mod 10;

 e := Y mod 10;

 X := 100 * s + 10 * d + e;

 write(X);

end.

Объяснение:

В условии ошибка. Должно быть так:

Зачеркнули 2-ую цифру , когда к образовавшемуся двухзначному числу приписали слева 2-ую цифру числа X , получилось число Y. По другому вообще непонятно, что такое Y. А так это известная задача перестановки местами соседних цифр в числе.