南京江宁汤山少儿信息学奥赛编程，2007信息学奥赛南京赛区初赛试题

想了解少儿编程，机器人编程，C++，Python，信息学奥赛等详细了解南京江宁汤山少儿信息学奥赛编程

1.2007信息学奥赛南京赛区初赛试题

气体平均相对分子质量=气体质量÷气体的物质的量 ·△H>0说明正反应为吸热反应 分析题目所给条件： ·随着温度升高，平衡向正反应方向移动 ·气体平均相对分子质量变小，有两种可能： ①：气体质量减小 ②：气体的物质的量增大 ·正反应的系数为3+3=6；逆反应的系数为1 正反应系数大于逆反应系数 结论：该题为气体质量减小，所以C一定时固体，A、B不定。 答案：(D)

2.信息学奥赛的编程软件是什么

记得是Pascal吧。不能使用smartdrv驱动的那种环境。现在也可以用delphi了，记得上次一个朋友告诉我的。总之学习object pascal就没错了。

3.请教一道信息学奥赛的pascal语言编程题

var name:array[1..100]of string; m:array[1..100]of longint; i,k,l,n,s1,s2:integer; max,sum:longint; ch1,ch2,ch:char; begin assign(input,'***.in'); reset(input); readln(n); for i:=1 to n do begin name[i]:='';m[i]:=0; repeat read(ch); if ch<>' ' then name[i]:=name[i]+ch; until ch=' '; read(s1,s2); read(ch1,ch1,ch2,ch2); readln(l); if (s1>80)and(l>=1) then m[i]:=m[i]+8000; if (s1>85)and(s2>80) then m[i]:=m[i]+4000; if s1>90 then m[i]:=m[i]+2000; if (s1>85)and(ch2='Y') then m[i]:=m[i]+1000; if (s2>80)and(ch1='Y') then m[i]:=m[i]+850; end; close(input); sum:=0;max:=0; for i:=1 to n do begin sum:=sum+m[i]; if max<m[i] then begin max:=m[i];k:=i; end; end; assign(output,'scholar.out'); rewrite(output); writeln(name[k]); writeln(max); writeln(sum); close(output); end.

想了解线上，线下课程，费用，地址的详细了解2007信息学奥赛南京赛区初赛试题，信息学奥赛的编程软件是什么，请教一道信息学奥赛的pascal语言编程题??