Даны два числа a, b. Найдите число, большее их среднего арифметического. Составьте блок – схему и в Паскаль
Var a,b,c:integer; begin readln(a,b); c:=(a+b)/2; writeln(c); end.