天才教育网合作机构>

南京童程童美

欢迎您!
朋友圈

15757356768

全国统一学习专线 9:00-21:00

位置:学校资讯 > 南京江宁淳化少儿信息学奥赛编程,请教一道信息学奥赛的pascal语言编程题

南京江宁淳化少儿信息学奥赛编程,请教一道信息学奥赛的pascal语言编程题

日期:2023-03-07 17:32:50     浏览:270    来源:南京童程童美
核心提示:想了解少儿编程,机器人编程,C++,Python,信息学奥赛等详细了解南京江宁淳化少儿信息学奥赛编程1.请教一道信息学奥赛的pascal语言编程题varname:array[1..100]of string;m:array[1..100]of longint;i,k,l,n,s1,s2:

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

1.请教一道信息学奥赛的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

想了解线上,线下课程,费用,地址的详细了解请教一道信息学奥赛的pascal语言编程题??

学员评价ASK list

  • 杨**评价:童程童美少儿编程实力挺不错的,正好在新街口附近有一家,上课方便,就给孩子报了,就当是兴趣班了,也难得孩子喜欢在这里上课
    手机号码: 158****6181   评价时间: 2025-01-23
  • 未**评价:家附近就有童程童美教育,环境挺不错的。前一段时间看到一篇文章介绍少儿编程的,觉得对孩子挺不错的,所以今天报了名,收费不算贵,老师挺好,不错!
    手机号码: 188****5939   评价时间: 2025-01-23
  • 王**评价:给孩子报名了童程童美的机器人编程课程,由编程老师授课,启发孩子大脑智力发展,培养逻辑思维能力,还是很不错的。
    手机号码: 151****8447   评价时间: 2025-01-23
  • 曹**评价:孩子6岁了,前段时间在短视频上看到说孩子学习编程将来的用处很多,孩子他爸说给孩子报个少儿编程的课 程学一学,正好看到这家童程童美,感觉牌子挺大的,刚让孩子学,应该能学到不少东西。
    手机号码: 137****2275   评价时间: 2025-01-23
  • 女**评价:南京童程童美少儿少儿编程挺不错的,孩子在这里学了一个阶段,能够左右一些作品,自我很有成就感,对于孩子的自信心培养很有帮助呢!而且童程童美老师很负责哦。
    手机号码: 188****6792   评价时间: 2025-01-23
  • 女**评价:朋友推荐来的童程童美,之前也了解过是*性的机构,带孩子来上课,教学还是挺好的,讲得也很详细。
    手机号码: 135****8407   评价时间: 2025-01-23

本文由 南京童程童美 整理发布。更多培训课程,学习资讯,课程优惠,课程开班,学校地址等学校信息,可以留下你的联系方式,让课程老师跟你详细解答:
咨询电话:15757356768