Предмет: Информатика,
автор: svyatoyglukov
написать программу для нахождения среднего арифметического значения для массива. Массив заполняется следующим образом for i:=1 to 5 do a[i]:=2*i-1
Ответы
Автор ответа:
1
var
a : Array [1..5] of integer;
b , i : integer;
begin
b:=0;
for i:= 1 to 5 do
begin
a[i] := 2 * i - 1;
b := b + a[i] ;
end;
writeln((b/5));
end.
Похожие вопросы
Предмет: Геометрия,
автор: danila537
Предмет: Физкультура и спорт,
автор: ERROROLESIA
Предмет: История,
автор: sashkalipchey
Предмет: Математика,
автор: Tolstovophft
Предмет: Математика,
автор: настя2532