某幼儿园里,有5个小朋友编号为1,2,3,4,5,他们按自己编号顺序围.pptVIP

某幼儿园里，有5个小朋友编号为1，2，3，4，5，他们按自己的编号顺序围坐在一张圆桌旁。他们身上都有若干个糖果，现在他们做一个分糖果游戏。从1号小朋友开始，将他的糖果均分三份（如果有多余的，则他将多余的糖果吃掉），自己留一份，其余两份分给他的相邻的两个小朋友。接着2号、3号、4号、5号小朋友也这如果做。问一轮后，每个小朋友手上分别有多少糖果。;program ex1; var x,y:integer; begin x:=0;y:=0; while x1000 do begin x:=x+1; y:=y+x; end; write(y); end. ;20:编程求1+3+5+...+n Input 输入一行，只有一个整数n (1=n=9999) 这里n为奇数。 Output 输出只有一行 Sample Input 99 Sample Output 2500;program xh_1; var t :integer; s:longint; begin s:=0; t:=1; while t=1000 do begin s:=s+t; t:=t+1; end; writeln(s); end.;编程求1+3+5+...+n 输入一行，只有一个整数n (1=n=9999) 这里n为奇数。 program ex20;var n:integer;???? y:longint;begin read(n);?? y:=(n+1)*(1+n) div 4; write(y);end. ;计算的是10个数中的最大值和最小值 ;program dx; var a,max,min,t:integer; begin read(a); max:=a;min:=a; t:=9; repeat read(a); if amax then max:=a; if amin then min:=a; t:=t-1; until t=0; writeln(max); writeln(min); end.;输入一串字符，以?结束，分别输出其中大写字母、小写字母，数字，其它的个数。;题37：任意输入一个整数，判断它是否为素数。是的话输出T,不是的话输出F. Input 输入只有一行，包括1个整数。 Output 输出只有一行. Sample Input 57 Sample Output F Hint （可以从定义----除了1与本身以外没有其它的约数）;program ex_37; var n,t:integer; f:boolean; begin read(n); f:=true; t:=2; while tn do begin if n mod t =0 then begin f:=false;break; end; t:=t+1; end; if n=1 then f:=false; if f=true then write(T) else write(F) ; end.;program ex_37; var n,t:integer; f:boolean; begin read(n); f:=true; t:=2; while tndo begin if n mod t =0 then begin f:=false;break; end; t:=t+1; end; if n=1 then f:=false; if f=true then write(T) else write(F) ; end.;求两个正整数m和n的最大公约数。　;求两个正整数m和n的最大公约数。　; 尼考曼彻斯法辗转相除法：;求两个正整数m和n的最大公约数。