南京靠谱的在线少儿信息学奥赛编程学习机构，求小学信息学奥赛QB教程和试题

想了解少儿编程，机器人编程，C++，Python，信息学奥赛等详细了解南京靠谱的在线少儿信息学奥赛编程学习机构

1.求小学信息学奥赛QB教程和试题

小学信息学奥赛练习12007-07-20 16:43【练习】 1. 通常在输入一个正确的程序之后，我们如何运行？ 2. 运行完毕之后，假如按Alt+F5，通常会出现什么颜色的界面？ 3. 如何定义变量abc为整数？ 4. 请完成这样的程序：从键盘输入一个非零整数，接着在屏幕输出其10倍 5. 为了计算半径为30的圆的周长，我们利用公式l=2*pi*r。请解释下面的程序为何不能输入3.14 program exe1_5; var pi:integer; begin read(pi); write(2*pi*30); end. 6. 请指出下列语句的错误 var a,b,a,3a,begin:integer; 7. 请指出下列程序的错误 begin read(a). write(a;3); end; 1、写出下列程序在turbo pascal下的输出结果。 program ex; const s='abcdefg'; var i:integer; r:real; c:char;b:boolean; begin i:=1234;r:=1234.5678; c:='#';b:=true; writeln(i,i:6,i:3); writeln(r,r:12:5,r:8:5); writeln(c,c:5); writeln(s,s:10,s:5); writeln(b,b:5,b:3); end 2、编一程序，将摄氏温度换为华氏温度。公式为：F=9*C/5+32，其中F为华氏温度,C是摄氏温度。 3、编一程序，输入三角形的三边a、b、c（假设这三边可以构成一个三角形），求三角形的面积S？ （提示：可利用海伦公式 1、分析并写出下列程序的运行结果： program chengji; var s:real;ch:char; begin s:=78.6; if(s>=90)and(s<=100)then ch:='A' else if (s>=70)and(s<90) then ch:='B' else if (s<70) then ch:='C'; writeln(s,'--',ch); End. 2、编写一与电脑猜"红"或"黑"的游戏。（先由计算机给出随机答案，然后由人猜，猜对输出"YOU WIN"否则输出"YOU LOST"。） 课内作业：输入两个数a、b，输出他们的和、差、积。 参考程序： Program xumin0001; Var a,b,he,cha,ji:integer; begin a:=10; b:=12; he:=a+b; cha:=a-b; ji:=a*b; write(he,cha,ji); end. 补充练习： 1、输入矩形的边长，分别输出周长、面积值。 2、输入两个整数，输出它们的平方和它们的平方根。 3、输入两个整数，输出它们相除的整数商（整除值）以及余数。 4、输入一个时间秒数，分别将其换算为下述时间单位输出：小时，天，星期 1、输入矩形的边长，分别输出周长、面积值。 2、输入两个整数，输出它们的平方和它们的平方根。 3、输入两个整数，输出它们相除的整数商（整除值）以及余数。 4、输入一个时间秒数，分别将其换算为下述时间单位输出：小时，天，星期

想了解线上，线下课程，费用，地址的详细了解求小学信息学奥赛QB教程和试题??