Free Pascal问题,用函数和过程解.1.找出由键盘任意输入三个整数中的最大数的过程.2.输入三个不同的整数,按由小到大排列,用过程编程.3.用不带参数的过程和带参数的过程分别编写一个程序,实
来源：学生作业帮助网 编辑：六六作业网 时间：2024/11/24 11:18:54
Free Pascal问题,用函数和过程解.1.找出由键盘任意输入三个整数中的最大数的过程.2.输入三个不同的整数,按由小到大排列,用过程编程.3.用不带参数的过程和带参数的过程分别编写一个程序,实
Free Pascal问题,用函数和过程解.
1.找出由键盘任意输入三个整数中的最大数的过程.
2.输入三个不同的整数,按由小到大排列,用过程编程.
3.用不带参数的过程和带参数的过程分别编写一个程序,实现x和y的值互相交换.
4.设计一个过程（数组参数）,将数组中的元素从小到大排列.
Free Pascal问题,用函数和过程解.1.找出由键盘任意输入三个整数中的最大数的过程.2.输入三个不同的整数,按由小到大排列,用过程编程.3.用不带参数的过程和带参数的过程分别编写一个程序,实
1、 var a,b,c,s:integer;
procedure max(a,b,c:integer;var s:integer);
var tmp:integer;
begin
if a>b then tmp:=a;a:=b;b:=tmp;
if a>c then tmp:=a;a:=c;c:=tmp;
if b>c then tmp:=b;b:=c;c:=tmp;
s:=c;
end;
begin
readln(a,b,c);
max(a,b,c,s);
writeln(s);
end.
其他的问题我临时没有时间 如果你不急的话 我会在 这周五晚上完整回答 我是个学生.
其实你的问题都是一些很基本的问题 1、2、4 基本上就是排序算法 3、其实更简单 定义一个中间变量, 例如 ： 把a、b的值交换 tmp:=a; a:=b; b:=tmp; 就相当于是加了一个中转站.
我的QQ是 597736446 还有问题可以随时问我.