Pascal 输入20个数求出他们的最大值最小值和平均值

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/09 10:15:01
Pascal 输入20个数求出他们的最大值最小值和平均值

Pascal 输入20个数求出他们的最大值最小值和平均值
Pascal 输入20个数求出他们的最大值最小值和平均值

Pascal 输入20个数求出他们的最大值最小值和平均值
同意 jaxxcyh 的意见!
看在你不知道的份上,给你一个参考程序.
var a:array[1..20]of real;
n,m,b:real;
i,j:integer;
begin
for i:=1 to 20 do begin
read(a[i]);
if a[i]>m then m:=a[i];
b:=b+a[i];
end;
readln;
writeln('Zuida=',m:0:2); b:=b/20;
n:=a[1];
for i:=2 to 20 do
if a[i]

Pascal 输入20个数求出他们的最大值最小值和平均值 用free pascal编程:输入两个数,求他们的最大公因数和最小公倍数 用vb编程:输入三个数,求出最大的数 一道pascal试题,输入两个数a,b求两个数的最大公因数(用while语句). 求平均数 用free pascal输入n个数,求出这些数的平均数.输入:只有一行共有n个数,数与数之间用一个空格隔开 (1 pascal语言:输入n个数,并输出最大的数和最小的数急!急!急! 用pascal计算题目问题一:用pascal输入10个任意整数,求他们的平均值二:按正序和反序分别输入26个英文字母三:输入20个整数,输出其中最大值四:输入20个整数,统计其中正负和零的个数 pascal求平均数(三)Description输入n个数,求出这些数的平均数.Input只有一行共有n个数,数与数之间用一个空格隔开 (1 free pascal问题:用集合做:输入一组数,程序判断出最大和的连续4个数和最小和的连续4个数例:输入3456789:3456789345(就像这几个数围成一圈) Pascal难题 最优二叉树现在有N个正整数,每一次去掉其中2个数a和b,然后加入一个数a*b+1,这样最后只剩下一个数p.要求求出最大的p记为maxp,最小的p记为minp,和他们的差K=maxp-minp.对于给定的数列,编 FREE PASCAL,输入两个数,求最小公倍数 用pascal 输入N个数,计算偶数、奇数和零的个数如题 用pascal编写程序 输入十个整数,统计大于0的数的个数.用pascal编写程序输入十个整数,统计大于0的数的个数. 用pascal求a 到b 之间的最大质数我的程序是求出A到B之间的所有质数后,再求出他们的个数.再怎么求a 到b 之间的最大质数?program sushu;vari,j,t,a,b:integer;f:boolean;beginreadln(a,b);if a=1 then a:=a+1;for i:= a to 求助一道pascal高精度乘法题:输入两个正整数m、n,输出他们的积.( 1 pascal输出如下图形Input输入一个数nOutput输出对应的图形Sample Input3Sample OutputAABAABCBA pascal程序 输入一个数,求它的绝对值、平方、平方根,前趋,后继 Pascal语言编程问题,找出第k个被3,5,7除的时候,余数为2,3,2的数输入格式一个数k输出格式求出第k个符合条件的数