回 帖 发 新 帖 刷新版面

主题:求助~~~~比较2个数的大小

[em10]
我刚开delphi这门课,在过程函数这2个方面弄的也不明白
题目:比较两个数的大小(只要用到过程和函数就行)操作界面简单就行

回复列表 (共2个回复)

沙发


过程没有返回值,函数有返回值,定义关键字不同

板凳

function Func_Name(var i,j:Integer):String;
var
   x,y:Integer;
begin
   return:='';
   x:=i;
   y:=j;
   if X>Y then
      return:='x大于y'
   else if x<y then
      return:='x小于y'
   else if x=y then
      return:='x等于y'; 
end;

我来回复

您尚未登录,请登录后再回复。点此登录或注册