广东2001年4月高等教育自学考试高级语言程序设计试题.docVIP

广东2001年4月高等教育自学考试高级语言程序设计试题 来源：考试大 【考试大：中国教育考试第一门户】 2001年5月14日 三、改错题（指出下列程序中的错误及出错原因。每小题2分，共8分）1.program er1（input，output）；var x：real；begin read（x）；if odd（x）then writeln（x is odd.）else if x mod 3=0then writeln（There is a factor of 3 in x）else writeln（x：4）end.（1）____________________（2）____________________2.program er2（input，output）；var i，s：integer；begin s：=0；for i：=a to ord（z）dobegin s：=s+i；i：=i+1 end；writeln（s：4）end.（1）____________________（2）____________________3.program er3（input，output）；var a，b：integer；function f（a，b：integer）：char；begin f：=ord（A）+（a-b）mod26 end；beg