function[A,B]=myhilb(n,m)
%問題：生成一個Hilbert矩陣，該矩陣是一個n×m矩陣，它的第i行
%第j列的元素為1/(i+j-1)。如果想在編寫的函數(shù)中實現(xiàn)下面幾點：
%1）如果只給出一個輸入?yún)?shù)，則會自動生成一個方陣，即有m=n
%2）如果想返回兩個參數(shù)A和B，則返回的B矩陣為A矩陣的平方，
%   即B=A'A
%3)在函數(shù)中給出合適的幫助信息，包括基本功能、調(diào)用方式
%   和參數(shù)說明

%myhilb 生成一個Hilbert矩陣 
% [A,B]=myhilb(n,m)
% where
% n,m are size of the Hilbert matrix,if only one
% argument given,then a square matrix is generated
% A is the Hilbert matrix
% B:if two matrices to be returned,B is assigned to
% A'*A
% 2001/12/1
if nargin==1,m=n;end
for i=1:n
   for j=1:m
      A(i,j)=1/(i+j-1);
   end
end
if (nargout==2),B=A'*A;end