用Pascal制作N进制乘法口诀表,急!答:var n,i,j,y:integer;s:string[2];f:text;begin assign(f,'table.in');reset(f);readln(f,n);close(f);assign(f,'table.out');rewrite(f);dec(n);write(f,' * ');for i:=0 to n do case i of 10..15:write(f,chr(i+55):2,' ');else write(f,i:2,' ');end;...