language: Pascal (gpc) (gpc 20070904)
date: 106 days 12 hours ago
link:
visibility: public 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

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
      begin
        x:=-(b/a);
        writeln(x:0:6)
      end;
end.