pascal读入两个小于100的正整数A和B,计算A+B. 需要注意的是:A和B的...答:程序已经完成,代码及运行图如下:const num:array[0..9]of string[5]=('zero','one','two','three','four','five','six','seven','eight','nine');var a,b,i,n:integer; c:char; ss:string; ans:array[1..100]of integer;function readnum:integer;var s:string[8]; j:...