题目集锦4.pptVIP

题目集锦 程序设计基础习题 1.输入100个数，求输入数的平均值，并统计高于平均值的个数。 续一： 续一修正： 续二： 续二修正： 主程序 主程序 2、输入12个数，首先将其放入一维数组中，然后把数组元素顺序放入3*4维数组中。 BEGIN ???aaray[1][j] ???for j to 1 to 12 do ????????read a[1][j] ???i ← 1??? ???for j ← 1? to 12? do ???begin ??????write a[1][j] ??????if?? j mod 4=0??? then ?????????writeln ?? end END ?? 3、将九九乘法表中的得数按行列位置存储到一个二维数组中。 BEGIN ??array[1..9][1..9] ??for? i? ← 1 to ?9?? do ????for ?j ← 1 to i?? do ??????read? a[i][j] ????i ← 1?????? j ← 1 ????repeat ???????a[i]a[j] ← j*i ????until?? ji? then ????writeln END ??? 4、输入10个数，按升序选择法输出，并输出输入时对应的序号 。 BEGIN arraya[1..10] ???n=10 ???for? i ← 1 to? 10 step 1? do read a[i] ???write?? i??? (先在第一行写入输入时的序号） writeln ???for? i ← 1to? n-1do ????? for j ← i+1to n step 1 do ????????if? a[i]a[j]? then ????????begin? ??????????temp ← a[i]，a[j] ← a[j]， a[j] ← a[j] ????????end ???for? i? ← 1 to 10 do ??????write a[i]?? （输出结果在第二行，两行对应） END 4、输入10个数，按升序选择法输出，并输出输入时对应的序号 。 （修正） BEGIN array a1[1..10]，array a2[1..10]， n ← 10 ???for? i ← 1 to? n step 1? do begin read a1[i] ，a2[i] ← i end ???for? i ← 1 to? n-1 do ????? for j ← i+1 to n step 1 do ????????if? a1[i]a1[j]? then ????????begin? ??????????temp ← a1[i]，a1[i] ← a1[j]， a1[j] ← temp ??????????temp ← a2[i]，a2[i] ← a2[j]， a2[j] ← temp ????????end ???for? i? ← 1 to n do ???begin??? write (a1[i], a2[i])?, writeln end END 2、输入12个数，首先将其放入一维数组中，然后把数组元素顺序放入3*4维数组中。 Function c (array b[1..3][1..4]) Begin for i ← 1 to 12 do read(a[i]) for i ← 1 to 3 do begin for j ← 1 to 4 do write (b[i][j]) writeln end end 3、将九九乘法的得数按行列位置存储到一个二维数组中 Function c (array b[1..9][1..9]) Begin for i ← 1 to 9 do begin for j ← 1 to 9 do d ← i*j read(d) end for m ← 1to 9 do begin for n ← 1 to 9 do write(b[m][n]) writeln end end 1.输入100个数，求输入数的平均值，并统计高于平均值的个数。 1.输入100个数，求输入数的平均值，并统计高于平均值的个数。 1.输入10个数，按升序排列输出并输出其输入时对应的序号 。 * function?? inputdata ( arraya[1..100]) n=100 begin for? i ← 1 to? 100 step?