В трехзначном числе x зачеркнули первую цифру. Когда оставшееся число умножили на 10, а произведение сложили с первой цифрой числа x, то получилось число 564. Найти число x - Pascal(Паскаль) - Справочник юного программиста Pascal/Delphi

var
  x: integer;
 
begin
  for x := 100 to 999 do //Задаем границы числа x
    if (x mod 100) * 10 + x div 100 = 564 then 
      writeln(x);
end.