数组保存(30分)

数组 myarray:array[1..N] of string;
要把数组保存成X行，Y列的*.TXT文件，（X*Y=N）
如：1、 myarray[1],myarray[2]………………myarray[Y];
2、 myarray[Y+1]，………………………………………
…………………………………………………………
X、 myarray[N-Y+1],myarray[N-Y+2]……myarray[N]。
这个什么做更好？30分。

自己写，几句就行了。

我自己已经搞定这个问题，