printf("Enter %d double f-p constants\n", k);
  for( i=0; i<k; i++ ) {
    scanf("%lf",&v[i]);
    printf("%.3e ",v[i]); fflush(stdout);
    if (++lines % 5 == 0) putchar('\n');
    if (i=k) putchar('\n');
  }