решить задачу на языке C# . Вычислить среднее арифметическое максимального и минимального элементов массива.

Эта же задача решенная на языке СИ:

#include stdio.h
#include clocale
int main() {
setlocale(LC_ALL, "rus");
int mas[10];
int max, min;
for (int i = 0; i < 10; i++) {
scanf_s("%d", &mas[i]);
}
max = mas[0];
min = mas[0];
for (int i = 0; i < 10; i++) {
printf("%d ", mas[i]);
}
for (int i = 1; i < 10; i++) {
if (max < mas[i]) {
max = mas[i];
}
if (mas[i] < min) {
min = mas[i];
}
}
printf("\nMin=%d,Max=%d,Среднее арифметическое=%d", min, max, (max + min) / 2);

}

1. Для цикла For есть решение выложенное выше  от Srzontmp.

2. Почти ничего не меня получим код для цикла while:
var
  i, n, k: integer;
begin
  i := 2;
  readln(n);
  while i <= n div 2 do begin
    if (n mod i) = 0 then k := i;
    i:=i+1;
    end;
  writeln('наибольший делитель ', n, ' = ', k);
end.

3. Аналогично для цикла Repeat:
var
  i, n, k: integer;
begin
  i := 2;
  readln(n);
  repeat
    if (n mod i) = 0 then k := i;
    i:=i+1;
  until i> n div 2;
  writeln('наибольший делитель ', n, ' = ', k);
end.

1. Для цикла For

var
  x,n,p:longint;
  i:integer;
begin
  readln (x,n);
  p:=1;
  for i := 1 to N do
    p:=p*x;
  writeln(x,' в степени ',n,' равно ',p );
end.

2. Для цикла While
var
  x,n,p:longint;
  i:integer;
begin
  readln (x,n);
  p:=1;
  i:=1;
  while i<=n do begin
    p:=p*x;
    i:=i+1;
  end;
  writeln(x,' в степени ',n,' равно ',p );
end.

3. Для цикла Repeat

var
  x,n,p:longint;
  i:integer;
begin
  readln (x,n);
  p:=1;
  i:=1;
  repeat
    p:=p*x;
    i:=i+1;
  until i>n;
  writeln(x,' в степени ',n,' равно ',p );
end.