帕斯卡函数刚刚学会了一天，赋值有问题

您似乎在使用 pascal 中的函数时犯了一个错误，没有返回正确的结果。

pascal 中的函数可以带回一个返回值，该值存储在结果中（例如，C 使用关键字 return 返回）。

例如，以下函数始终返回 1：

function foo:integer;

beginresult:=1;

end;当您调用 foo 时，它会带回一个 1。 例如，您可以在主程序中编写如下内容：

vari:integer;

i:=foo;

这样，foo 的返回值 1 被分配给 i。

也可以是这样的。

if(foo=1) then ..

此条件分支的结果始终为 true。

背景到此结束。

让我们来看看你的函数。

function max(x,y,z:real):real;

var i,t:real;

beginif xif xi:=x;end;

我猜你的意图是用 i 来保持最大值。 经过两次交换后，x被替换为最大的数字，x的值被分配给i，因此i是x，y，z的最大值。 但就像我之前说的，该函数只带回结果的值，它不知道你希望它带回 i。

因此，您在主程序中无法获得正确的结果。

此外，这里没有必要交换 x、y 和 z。 只需保存最大值即可。

因此，请对函数进行以下更改：

function max(x,y,z:real):real;

varmax:real;

beginmax:=x;

if maxif maxresult:=max;

end;完成。

ps：下次提问时，记得把问题解释清楚，否则很难找到问题所在。

PS再说一遍：你的学习进度够慢的......

示例**:d编译并运行 Elphi7。

program hanshu;

var a,b,c,m:real;

function max(x,y,z:real):real;

varmax:real;

beginmax:=x;

if maxif maxresult:=max;

end;begin

read(a,b,c);

m:=max(a,b,c)/(max(a+b,b,c)*max(a,b,b+c));

writeln(m:10:4);

readln;

end.

函数值类型 Integer 自然变量类型 Integer。

abs,sqr,pred,succ

函数值类型 实数 自然变量类型 整数。

sin、cos、arctan、ln、exp、sqrt 函数值类型 字符 自然变量类型 整数。

char 函数 值 类型 布尔 自然变量 类型 整数。

奇数函数值类型 整数 自然变量类型 实数 截断、舍入

函数值类型 实数 自然变量类型 实数。

sin、cos、arctan、ln、exp、abs、sqr、函数值类型、整数、自然变量类型、字符。

ORD 函数值类型 字符 自然变量类型 字符 pred， succ

函数值类型：Integer Natural 变量类型：Boolean。

ord 函数的值类型是布尔 自然变量类型 Boolean pred， succ

函数值类型 Boolean Natural 变量类型文件。

eof,eoln

奇数确定奇数和偶数。

绝对的ABS。

sqr 是平方函数。

CHR 查找与 ASCLL 代码对应的字符。

ord 查找字符的 ASCLL 代码。

截断结束函数（删除小数点）。

四舍五入。

pred 是字符 pred（'b')='a'

succ 找到角色的后继者 succ（'b')='c'

函数具有返回值，但过程没有。

个人观点：流程是鸡肋骨，可以用功能代替。

示例：使用函数。

program cs;

vara,b:longint;

function jiafa(c,d:longint):longint;

beginjiafa:=c+d;

end;begin

readln(a,b);

writeln(a,'+',b,'=',jiafa(a,b));

end.看看上面的加法过程。

输入两个数字。

例如，1 2 输出 1+2=3

其中 jiafa 是一个返回值为 longint 类型的函数，它本身可以看作是 longint;

功能相同，使用过程相同。

program cs;

vara,b,sum:longint;

procedure jiafa;

beginsum:=a+b;

end;begin

readln(a,b);

jiafa;

writeln(a,'+',b,'=',sum);

end.由于该进程没有返回值，因此您必须操作全局变量，否则会浪费工作。

真的是这个功能，一般都是用过程来读取，设置初始值，输出。。。

函数（尤其是递归调用）用于特定计算。

如果你不明白，书中一定有什么东西。

唉。。。 其实本质没什么不同，只是函数支持返回值...

你为什么胡说八道。

它应该是一样的。

这太过分了。

有系统默认值，您也可以自己定义它们。

太多的 1,2 倍功能。

反比例函数。

一维数组。 二维数组。

很难数。

上面的那个，你误解了“功能”的含义。

抱着主，听：

为了解决复杂的问题，我们经常将一个大型程序分成几个相对独立的程序模块，每个模块都用于实现一个特定的功能。 这样的程序块称为子例程。 整个程序通过使用一个主程序作为线索并调用几个子程序来解决问题。

下图显示了主程序和调用的子例程之间的关系，我们应该注意，当调用一个子例程时，它总是返回到调用点的下一个语句以继续执行。 在 Pascal 中，子例程有两种形式：函数和过程。

自定义函数必须放在其主程序的描述部分。 调用自定义函数就像调用标准函数一样。 该函数最终返回一个值，因此可以将该函数视为一段数据并放入表达式中。

过程：描述可以包括常量描述、变量描述、类型描述，也可以包括其他函数和过程的描述。 这个过程也可能是无法解释的。

描述部分中定义的变量称为局部变量，在进程完成并返回其更高级别的程序后，这些局部变量将全部释放，而不会对主程序产生任何影响。

返回结果系统是将函数的最终值返回给调用它的程序。

函数必须向调用它的程序返回值，而过程不会向调用它的程序返回值。 该过程更像是一个子程序。

我测试了一下。 int 和 trunc 得到的值是相同的。 但是，如果在 int 函数之前使用 inttostr，则会报错，并且只能使用 floattostr。

而 TRUNC 前面是 inttostr 和 floattostr也许返回值类型不同，我没有看到其他任何不同之处。

这两个函数都采用整数部分，但 int 的结果是实数，trunc 的结果是整数。

如 int（trunc（

我也看过书，在网上查了一下，到处的答案都不一样，然后我亲自在freepascal上测试了上面的结果。

int 实际上是一个舍入函数，四舍五入。 也就是说，trunc，虽然也是，但采用截断方法。 即

int 四舍五入，即数字向下舍入到最接近的整数。 例如，int（ 返回 5，int（ 返回 -6，即返回值小于原始值。

frunc？它应该是截断的，对吧？

TRUNC 被截断，即仅删除小数部分。 例如 trunc（return 5， int（return -5.

TRUNC 是截断的，int 是向下舍入的。 它们在正数上是相同的，但在负数上却不是。 向下舍入为 -2 并截断为 -1，因此 int（，trunc（

1.定义函数的一般格式是。

function(a,b:integer):sz;(type sz=array[0..199] of byte;)

beginend;

k 的值范围是多少？

第二个问题更简单。

您知道吗，例如，转换 （2）10=（10）2 的最简单方法是什么？

1 0 我认为 246810....应该反过来：十进制数也是如此，例如十进制数 3、6、9、12......

首先定义一个常量。

shu='0123456789abcdef'

然后，您可以用数字组合位置。

怎么做： 问题 1：取余数倒写。

问题 2：增加功率。