If15. даны три числа. найти сумму двух наибольших из них.( сделать блок схему пож)

Var a,b,c:integer;beginreadln(a,b,c);if a>b then if b>c then writeln(a+b)else writeln(a+c)else if a>c then writeln(b+a)else writeln(c+b);end.