($a,$b,$c)=glob<>;
$d=$b**2-4*$a*$c;
print $d<0?imaginary:do{$d=sqrt$d;(-$b-$d)/$a/2,$d?$".(-$b+$d)/$a/2:""}