В заданном векторе (одномерном массиве) найти: наибольший отрицательный и наименьший положительные элементы - C#

Формулировка задачи:

В заданном векторе (одномерном массиве) найти: наибольший отрицательный и наименьший положительные элементы. есть в паскале Найти наибольший отрицательный и наименьший положительный элементы одномерного массива

const
  nmax=50;
var
  a: array[1..nmax] of integer;
  n,i,min,max: integer;
begin
  randomize;
  repeat
    write('Введите размер массива (n<50):');
    readln(n);
  until n in[1..50];
  min:=-1;
  max:=1;
  writeln('Исходный массив:');
  for i:=1 to n do
  begin
    a[i]:=-99+random(199);
    write(a[i]:4);
    if a[i]<0 then  max:=a[i]
    else if a[i]>0 then min:=a[i];
  end;
  writeln;
  if min=-1 then writeln('Положительных элементов нет')
  else
   begin
    for i:=1 to n do
    if (a[i]>0)and(a[i]<min) then min:=a[i];
    writeln('Минимальный положительный=',min);
   end;
  if max=1 then writeln('Отрицательных элементов нет')
  else
   begin
    for i:=1 to n do
    if (a[i]<0)and(a[i]>max) then max:=a[i];
    writeln('Максимальный отрицательный=',max);
   end;
end.

кто может для си шарпа сделать?

Решение задачи: «В заданном векторе (одномерном массиве) найти: наибольший отрицательный и наименьший положительные элементы»

textual
                            Листинг программы 
                        
                            Console.WriteLin("max:" + array.Where(x=>x<0).Max());
Console.WriteLin("min:" + array.Where(x=>x>0).Min());