输入二个数，判断它们哪个是最大数，并将最大数输出。请用流程图描述本题的算法。

pascal:
var
a,b:integer;
begin
readln(a,b);
if a>b then writeln(a) else writeln(b);
end.

流程图：('.'是空格)
............../\
............./..\
............/a>b.\
.......true|\..../|flase
...........|.\../.|
...........|..\/..|
........../\...../\
........./wr\.../wr\
......../itel\./itel\
........\n(a)/.\n(b)/
.........\../...\../
..........\/.....\/
..........|_______|
..............|
.............end

DIMENSION a(3)
FOR i=1 to 3
input "第"+ALLTRIM(STR(i))+"个数" to a(i)
ENDFOR
FOR m=1 to 2
FOR n=2 to 3
IF a(m)>a(n)
s=a(n)
a(n)=a(m)
a(m)=s
ENDIF
ENDFOR
ENDFOR
?"从小到大",a(1),a(2),a(3)

?"从大到小",a(3),a(2),a(1)

三个数排序
别人说是冒泡法
我不晓得
应该看得懂这