2. Вычислите среднее арифметическое значение элементов двухмерного массива А(8*9), больших заданного числа Q.

begin// ввести значения массива а и значение Qfor i:=1 to 8for j:=1 to 9if a[i,j]>Q thenbegin sum=sum+a[i,j]; kol=kol+1;end;if kol>0 thensr=sum/kol;write('srednee= ',sr);elsewrite('net takih chisel');end.