Free Pascal语言.求10个数的最大值和最小值,我们循环语句的作业,帮看下,

问题描述:

Free Pascal语言.求10个数的最大值和最小值,我们循环语句的作业,帮看下,
1个回答 分类:综合 2014-09-29

问题解答:

我来补答
只要从一开始比较,小的就赋给min,大的就赋给max
program ex1;
var max,min,i,n:longint;
begin
max:=-maxlongint;
min:=malongint;
for i:=1 to 10 do
begin
readln(n);
if n>max then max:=n;
if n
 
 
展开全文阅读
剩余:2000
上一页:牛刀小试4
下一页:第二问不会作