var
n, d : integer;
izlaz : Text;
begin
Assign(izlaz,'sredcif.out'); Rewrite(izlaz);
for
n := 100 to 999 do
begin
d := n mod 10 + 10 * (n div
100);
if
n mod d = 0 then
WriteLn(izlaz, n, ' = ', d, ' * ', n div d);
end;
Close(izlaz);
end.
