Преобразуйте, пожалуйста, данный код PascalABC.NET в код С# - C#

Program z1;
const
Nmax=50;
 
type
massiv=array[1..Nmax] of integer;
 
var
mas:massiv;
n:integer;
 
procedure vvod(kol:integer; var mas:massiv);
var
i:integer;
begin
for i:=1 to kol do
begin
writeln('Ведите ',i,' - й элемент массива');
readln(mas[i]);
end;
end;
 
procedure vyvod(kol: integer; mas: massiv);
var
i: integer;
begin
for i := 1 to kol do
begin
Write(mas[i]:6);
end;
Writeln;
end;
 
procedure obmen(var a, b: integer);
var x: integer;
begin
x := a; a := b; b := x;
end;
procedure Sort_vybor(kol:integer; var mas:massiv);
var i,j:integer;
max, nom_max:integer;
begin
for i:=1 to kol-1 do
begin
nom_max:=i; max:=mas[i];
for j:=i+1 to kol do
if (mas[j]>max) then
begin
nom_max:=j; max:=mas[j];
end;
obmen(mas[i], mas[nom_max]);
end;
end;
begin
writeln('Введите количество вырубленных деревьев');
readln(n);
vvod(n, mas);
writeln('Содержимое исходного массива:');
vyvod(n, mas);
Sort_vybor(n,mas);
writeln('Содержимое упорядоченного массива:');
vyvod(n, mas);
end.