Написать программу, которая вводит с клавиатуры последовательность из 10 вещественных чисел, считает сумму и среднее арифметическое этих чисел. нужно к этой задачке составить блок-схему. пожалуйста. дам 60 баллов

спасибо огромное

спасибо

var i:integer;sum,sr,n:real;beginsum:=0;for i:=1 to 10 dobeginread(n);sum:=sum+n;end;sr:=sum/10;write('sum=', sum, 'sred=', sr);end.

var i:integer;   a,sum,s:real; begin    for i:=1 to 10 do        begin             read(a);    sum:=sum+a;         end;     write('Сумма: ',sum);    s:=s/10;     write('Cреднее арифметическое: ',s); end.