请问这段代码如何翻译为Pascal语法？谢谢

Question

这是一个标点符号校对算法的实现：
int i,j,l;  //"i"记录待处理文本的位置，"j"表示标点符号数组下标，"l"表示清栈时还存在栈中的标点符号数组的下标Advice[]correct;      //correct[]用以记录相应的纠错建议
Stack compare;       //"compare"为处理配对标点的堆栈
Punctuation[]bd;     //用以记录标点符号
Punctuation[]endcorrect;      //用来接收清栈还存在在堆栈中的标点符号
Jniedit jniEdit=new Jniedit(textString);      //textstring为待校对文本
jniEdit.parsewords();        //分词
int[]atrib=jniEdit.getAttribution();    //获得分出来的词的词性
Unit[]tempUnit=jniEdit.getunit_array(); //获得分出来的句子的内容
while(i<=tempUnit.length)
{
if(tempUnit[i].getWord().compareTo("，")==0)
{
bd[j].punctuation=tempUnit[i].getWord();  //如果是逗号，则作相应处
bd[j].postion=i;
j++;    //将此标点符号放入标点符号数组记录下此标点在句子中的位
douhao(bd[j]); //调用逗号处理程序
i++;}         //读取下一个标点符号

Answer 1

java的吧，翻delphi倒是不难，没有lib翻过来也没用啊