abc * abc = defbc

var
    a, b, c, _b, _c, _d, _e, _f: integer;
    bufer: longint;

begin
    for a := 0 to 9 do begin
        for b := 0 to 9 do begin
            for c := 0 to 9 do begin
                bufer := a*100 + b*10 + c;
                bufer := bufer * bufer;
                if (bufer < 99999) then begin

                _c := bufer mod 10;
                _b := (bufer div 10) mod 10;
                _f := (bufer div 100) mod 10;
                _e := (bufer div 1000) mod 10;
                _d := bufer div 10000;

                if ((b = _b) and (c = _c) and (a <> b) and (a <> c) and (b <> c) and (_c <> _f) and (_c <> _e) and (_c <> _d) and (_b <> _f) and (_b <> _e) and (_b <> _d) and (_f <> _e) and (_f <> _d) and (_e <> _d)) then
                begin
                    writeln(sqrt(bufer):0:0);
                end;
            end;
            end;
        end;
    end;
end.