помогите студенту)))

[Олегиус]

из трехзначного числа х вычли его последнюю цифру ..когда результат розделили на 10 ,а к частному с лева приписали последнюю цифру числа х,то получилось число 273 найти число х...!!

[Hacker19_90]

Ну, логичнее всего сделать всё сточностью да нооборот!!!
допустим так:

....
chislo := 273 div 10;
ostatok := 273 mod 10;
chislo := chislo * 10;
chislo := chislo + ostatok;

хотя х(или как у меня chislo) равен 273!!!!!!
273 - 3 = 270
270/10 = 27
27 и если дописать 3 то получиться 273!!!

[Serge_Bliznykov]

имхо, правильный ответ: исходное число было 732

var
  KRes, One : integer;
begin
  WriteLn;
  Write('Введите полученное число:');
{  Readln(KRes);}
  KRes := 273;
  
  {сначала уберём приписанную слева цифру}
  One := KRes div 100;
  KRes := KRes mod 100;
  
  {теперь умножим его на 10}
  KRes := KRes * 10;
  
  {теперь добавим сохраннёную цифру}
  KRes := KRes + One;
  
  WriteLn('Исходное число было такое: ',KRes);  
end.