Написать в системе паскаль средний балл мойх оценок.: 3,4,5,4,4,3,4,4,5,4,4,3,3,4,4,4,3

const n=17; //Количество оценокvar a: array [1… n] of integer; i, sum: integer; begin sum: =0; for i: =1 to n do read (a[i]); for i: =1 to n do inc (sum, a[i]); writeln (sum / n); end.