1. в целочисленной матрице размерностью 3х3 найти сумму наибольшего и наименьшего элементов матрицы паскаль

2. дан массив из 10 целых чисел. написать программу нахождения количества четных элементов массива

const n=3; var a:array[1..n,1..n] of integer;i,j,s,max,min:integer;beginmax:=-32767;min:=32767;for i:=1 no n do for j:=1 to n dobeginreadln(a[i,j]);if a[i,j]>max then max:=a[i,j];if a[i,j]<min then min:=a[i,j];end;writeln(max+min)end.