Перевести с языка Pascal на C++

program variant_10;
uses crt;
const n=5;
      v_min=-20;
      v_max=10;      
var matrix:array[1..n,1..n] of integer;
    i,j,x:integer;
begin
  writeln('Лабораторная работа №6, задание 2');
  writeln('Вариант №10');  
  writeln('ПИ-18-1');  
  writeln('Мисюркеев Денис'); 
  writeln;
  writeln('Входные данные:');
  writeln('v_min = -20. Минимальное значение, которое может принимать элемент матрицы');
  writeln('v_max = 10. Максимальное значение, которое может принимать элемент матрицы');
  writeln('n = 5. Количество элементов в каждой строке матрицы');
  writeln;
  randomize;
  writeln('Исходная матрица:');
  writeln('────┬────┬────┬────┬────┐');  
  for i:=1 to n do
    begin
    for j:=1 to n do     //Заполнение матрицы случайными числами в интервале от v_min до v_max
      begin
        matrix[i,j]:=v_min+random(v_max-v_min+1);
        write(matrix[i,j]:4,'│');    
      end;
    writeln;
    writeln('────┼────┼────┼────┼────┤');
    end;
  for i:=2 to n do
    for j:=1 to i-1 do
      begin
        x:=matrix[i,j];
        matrix[i,j]:=matrix[j,i];
        matrix[j,i]:=x;
      end;
  writeln;
  writeln('Выходные данные:');
  writeln;
  writeln('Транспонированная матрица:');
  writeln('────┬────┬────┬────┬────┐'); 
    for i:=1 to n do
      begin
      for j:=1 to n do
        write(matrix[i,j]:4,'│');
    writeln;
    writeln('────┼────┼────┼────┼────┤');
      end;
    for i:=1 to n-1 do
      for j:=1 to n-i do
        begin
          x:=matrix[i,j];
          matrix[i,j]:=matrix[n-j+1,n-i+1];
          matrix[n-j+1,n-i+1]:=x;
        end;
  writeln;
  writeln('Отражение матрицы относительно побочной диагонали:');
  writeln('────┬────┬────┬────┬────┐'); 
    for i:=1 to n do
      begin
        for j:=1 to n do
          write(matrix[i,j]:4,'│');
    writeln;
    writeln('────┼────┼────┼────┼────┤');
      end;
  writeln;
end.