language: Pascal (gpc) (gpc 20070904)
date: 105 days 15 hours ago
link:
visibility: public
1
2
3
4
5
6
7
8
9
10
11
12
program eqfst (input,output);
    var a, b , x: real;
begin
    readln(a, b);
    if (a=0) then
      begin
        if (b=0) then writeln('trivial')
          else writeln('impossible')
      end;
    if (a<>0) then x:=-(b/a);
    writeln(x:0:6);
end.