В трехзначном числе х зачеркнули 1 цифру.Когда оставшиеся число умножили на 10,а произведение сложили с первой цифрой числа х,то получилось 564.Найти х.
В Pasсal.

Спасибо)

Достаточно кнопочки)

мы не получили число 564

Так введите 564 и получите решение:Введите целое трехзначное положительное число ->564Первоначальное число было: 456Зачеркнули первую цифру: 56Умножили на 10: 560Прибавили зачеркнутую цифру: 564И получили введенное нами число - результат

Программа решает задачу с любым трехзначным числом

var  x, a, b, c, y: integer;begin  Write('Введите целое трехзначное положительное число ->');  Readln(x);  a := x mod 10;  y := 100 * a + (x div 10);  Writeln('Первоначальное число было: ', y);  b := y mod 100;  Writeln('Зачеркнули первую цифру: ', b);  b := 10 * b;  Writeln('Умножили на 10: ', b);  b := b + (y div 100);  Writeln('Прибавили зачеркнутую цифру: ', b);  Writeln('И получили введенное нами число - результат')end.Тестовое решение:Введите целое трехзначное положительное число ->183Первоначальное число было: 318Зачеркнули первую цифру: 18Умножили на 10: 180Прибавили зачеркнутую цифру: 183И получили введенное нами число - результат