Составить блок-схему и программу в паскале для решения задачи:Задать три числа и найти их среднее арифметическое
Var a,b,c:integer; begin readln(a); readln(b); readln(c); writeln('Среднее арифметическое: ', (a+b+c)/3); end.
Var c, a, b: integer; begin readln(a, b, c); writeln((a + b + c) / 3); end.