Составить блок схему: var a,b,c:integer; Begin read(a,b,c); if (a>b) then a:=a else a:=b; if (a>c) then a:=a else a:=c; writeln(a); End.
A=a - это глупость. if not(a>b) then a:=b; <-так правильнее.<br>