jz1014【入门】求三个数的最大数

 

【参考代码一】

var
    a,b,c:longint;
begin
    readln(a,b,c);
    if (a>b)and(a>c) then writeln(a)
    else if (b>a)and(b>c) then writeln(b)
    else writeln(c);
end.

 

【参考代码二】

var
    a,b,c:longint;
begin
    readln(a,b,c);
    if b>a then a:=b;
    if c>a then a:=c;
    writeln(a);
end.