begin
  var a := 2.5;
  var b := 0.4;
  var dt := 0.1;
  var t := -1.0;
  for var i := 0 to 19 do
  begin
    WriteLn((t < 0.1 ? Sqrt(a * Sqr(t) + b * Sin(t) + 1) : t = 0.1 ? a * t + b : Sqrt(a * Sqr(t) + b * Cos(t) + 1)):8:5);
    t += dt;
  end;
end.