Составить блок-схему и программу в паскале для решения задачи:Задать три числа и найти их среднее арифметическое

var a,b,c:integer;beginreadln(a);readln(b);readln(c);writeln('Среднее арифметическое: ', (a+b+c)/3);end.