fork download
  1. program q_210540617_1;
  2. var
  3. x : integer;
  4. y : real;
  5. begin
  6. read(x);
  7. y := sqrt(x + 5) - sqrt(x + 3);
  8. writeln(y);
  9. end.
Success #stdin #stdout 0s 336KB
stdin
1
stdout
 4.4948974278317810E-001