1、pascal 生成100个数 求低于平均数个数 哪几个2、生成100个数,求偶数个数3、生成10个数,交换第5个和第8个4、生成10个数,删去最高、最低5、生成10个数,把最后一个挪到第一个
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/25 08:34:20
1、pascal生成100个数求低于平均数个数哪几个2、生成100个数,求偶数个数3、生成10个数,交换第5个和第8个4、生成10个数,删去最高、最低5、生成10个数,把最后一个挪到第一个1、pasc
1、pascal 生成100个数 求低于平均数个数 哪几个2、生成100个数,求偶数个数3、生成10个数,交换第5个和第8个4、生成10个数,删去最高、最低5、生成10个数,把最后一个挪到第一个
1、pascal 生成100个数 求低于平均数个数 哪几个
2、生成100个数,求偶数个数
3、生成10个数,交换第5个和第8个
4、生成10个数,删去最高、最低
5、生成10个数,把最后一个挪到第一个
1、pascal 生成100个数 求低于平均数个数 哪几个2、生成100个数,求偶数个数3、生成10个数,交换第5个和第8个4、生成10个数,删去最高、最低5、生成10个数,把最后一个挪到第一个
1.可以用随机函数:random
program 1;
var a:array[1..100]of longint;
i:longint;
x:double;
begin
for i :=1 to 100 do //循环100个数
a[i]:=random(10000)+1; //生成数(后面的生成和两行语句差不多,就不打了)
for i :=1 to 100 do
x:=x+a[i];
x:=x/100;
for i :=1 to 100 do
if a[i]max then max:=a[i];
if a[i]
1、pascal 生成100个数 求低于平均数个数 哪几个2、生成100个数,求偶数个数3、生成10个数,交换第5个和第8个4、生成10个数,删去最高、最低5、生成10个数,把最后一个挪到第一个
pascal语言编程问题(free pascal求1—N中的素数的个数.(1
pascal求两个数的最小公倍数
FREE PASCAL,输入两个数,求最小公倍数
Pascal语言求两个数的最小公倍数和最大公约数
1025:【入门】求n个数的最大值和最小值 pascal
PASCAL语言求程序:对于给定的n,求1至n中有多少个数是质数
求100以内的素数pascal语言
求平均数 用free pascal输入n个数,求出这些数的平均数.输入:只有一行共有n个数,数与数之间用一个空格隔开 (1
pascal求平均数(三)Description输入n个数,求出这些数的平均数.Input只有一行共有n个数,数与数之间用一个空格隔开 (1
pascal编程求1+3+5+...+n一定要是自己是过的,要用pascal!
pascal 奇数阶幻方用pascal实现生成任意奇数阶幻方
pascal题:取数,求代码!有n个数(2≤n≤100),排成一排,从n个数中任取若干个数,取数规则为每次取相邻的2个数,不能取1个,也不能取多于2个连续的数,找一种取法,使取得的数的和为最大.例如:n=
pascal求N个数中最大数及其位置【输入样例】55 4 3 2 1 【输出样例】5 1
给出一个整数n,其中n小于等于1000.请求出1~n中所有的素数的个数求一pascal程序
用free pascal编程:输入两个数,求他们的最大公因数和最小公倍数
Free Pascal语言.求10个数的最大值和最小值,我们循环语句的作业,帮看下,
求n 个数的最小公倍数!(要用pascal语言做,今晚必回!)