我如何比较帕斯卡中的 3 个数字

Question

我是新手我需要如何在帕斯卡中比较 3 个数字。

这是我到目前为止尝试过的

BEGIN
max:=A;
IF B>A THEN max:= B;
IF C>B THEN max:= C;
END;

但是当我选择例如 A = 5 , B=2 , C=4 时，输出是 4，但它应该是 5。问题出在哪里？

我想在最后写ln（'大数是'，max）;

Answer 1

你可以这样做（你应该与max进行比较）

BEGIN
max:=A;
IF B>max THEN max:= B;
IF C>max THEN max:= C;
END;

Answer 2

您必须与max进行比较，而不是A或B。以简单的方式更改代码：

BEGIN
  max := A;
  IF B > max
  THEN
     max := B;
  IF C > max
  THEN
     max := C; 
END;

Answer 3

或者

，在最近的Pascal中，如Delphi或Free Pascal，使用MATH单元中的max函数。

result:=max(a,max(b,c));

Answer 4

使用 Pascal 的最大函数

PROGRAM MaxProgram;
USES math;
VAR
    num1,num2,num3,maxNum : INTEGER;
BEGIN
    (* Receive the Values *)
    WRITELN('Enter First Number');
    READLN(num1);
    WRITELN('Enter Second Number');
    READLN(num2);
    WRITELN('Enter Third Number');
    READLN(num3);
    (* Using the Max Function *)
    maxNum := max(num1,max(num2,num3));
    (* Display Result *)
    writeln('The Highest number is ', MAXNUM);
END.