NOIP2015普及组初赛试题及答案(Pascal)要素.doc

第二十一届全国青少年信息学奥林匹克联赛初赛 普及组Pascal语言试题 竞赛时间：201年10月1日14:30~16:30选手注意试题纸共有页，答题纸共有2页，满分100分。请在答题纸上作答，写在试题纸上一律无效。不得使用任何电子设备（如计算器、手机、电子词典等）或查阅任何书籍资料。 输出： 2. type point = record x: longint; y: longint; end; EX = record a: longint; b: longint; c: point; end; var e: EX; begin e.a := 1; e.b := 2; e.c.x := e.a + e.b; e.c.y := e.a * e.b; writeln(e.c.x, ,, e.c.y); end. 输出： 3. ?var str: string; i: longint; cou