Вычислить среднеарифметическое значение всех элементов массива dat[1:10].

Нужно

Question

Информатика: Вычислить среднеарифметическое значение всех элементов массива dat[1:10]. Нужно

Vasilchenkodan · Answer

var  a: integer  dat:array [1..10] of integerbegina:=0;for 1 to 10 do begin  a = a+dat;end;a := a/10;writeln(a);end....