Написать программу, которая вводит с клавиатуры последовательность из 10 вещественных чисел, считает сумму и среднее арифметическое этих чисел. нужно к этой задачке составить блок-схему. пожалуйста. дам 60 баллов
Ответ
Автор - Osleeenok
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.
Ответ
Автор - NotOfNoumber
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.