Question

我是新手我需要如何比较Pascal中的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.问题出在哪里？

我想在最后的writeln（'The Large Number is'，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的 Max 功能

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.

我如何比较Pascal中的3个数字？

4 个答案: