看题
小学生题目编程源代码
Program exam(output,input);Label 1,2,3,4,5,6,7,8;Varnum1,num2,num3,num4,answer:real;g,i,j:integer;Procedure caculate(num1,num2:real;Var answer:real);Begini:=1Repeatwrite( '题目',i,':','');i:=i+1;&...
Program exam(output,input);Label 1,2,3,4,5,6,7,8;Varnum1,num2,num3,num4,answer:real;g,i,j:integer;Procedure caculate(num1,num2:real;Var answer:real);Begini:=1Repeatwrite( '题目',i,':','');i:=i+1;&...