Program DemoRandom;
Var
  Q : real;

Begin
  randomize;
  Q := 99.0 * random + 1.0;
  writeln (Q:5:2);
End.