设计一个算法求a,b,c的最大值

题目

设计一个算法求a,b,c的最大值

答案

Pascal的编法:program ex1; var a,b,c:integer; begin readln(a);readln(b);readln(c); if a>=b then if a>=c then writeln(a) else writeln(c); if a=c then writeln(b) else writeln(c); end.