Question

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

Answer 1

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

Answer 2

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

Answer 3

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.

Answer 4

спасибо