function [mean mymin mymax n] = f10 (x)                              %  f10.m
  fprintf('%s: Number of input  arguments is%2d',mfilename,nargin);
  if (nargin == 1)
    fprintf('\nInput Argument name is : %s',inputname(1));
  end
  fprintf('\n');
  fprintf('%s: Number of output arguments is%2d\n',mfilename,nargout);
  n=length(x); mean=sum(x)/n; mymin=min(x);mymax=max(x);
end
