Составьте блок-схему и программу решения следующей : найдите среднее арифметическое пяти чисел, введенных с клавиатуры.

Без блок-схемы.

var i,sum,n: Integer;
begin
sum:=0;
for i:=0 to 4 do
begin
writeln('Введите ',i+1,' число');
readln(n);
sum:=sum+n;
end;
writeln('ответ: ',sum/5);
end.