While循环中的递归关系

Question

我有一个伪代码如下：

Do While i<m and j<n ;
a[i,j]=a[i,j]+a[i-1,j-1];
j=j+1;
i=i+1;

我怎样才能在Mathematica中写这个？我可以在循环中使用递归关系吗？