Перевод программы из Pascal на C++

const nmax=15;
var a:array[1..nmax,1..nmax] of integer;
    b:array[1..nmax,1..nmax] of boolean;
    m,n,i,j,x,k:integer;
begin
randomize;
repeat
write('Количество строк до ',nmax,' m=');
read(m);
until m in [1..nmax];
repeat
write('Количество столбцов до ',nmax,' n=');
read(n);
until n in [1..nmax];
for i:=1 to m do
for j:=1 to n do
b[i,j]:=false;
writeln('Введите тройки чисел: индексы и значение элемента, окончание ввода 3 ноля');
k:=0;
repeat
write('Индекс строки i=');read(i);
write('Индекс столбца j=');read(j);
write('Значение элемента x=');read(x);
if (i in [1..m])and(j in [1..n])and(b[i,j]=false) then
 begin
  k:=k+1;
  a[i,j]:=x
 end;
until(i=0)and(j=0)and(x=0);
if k=m*n then
 begin
  writeln('Получившаяся матрица:');
  for i:=1 to m do
   begin
    for j:=1 to n do
    write(a[i,j]:4);
    writeln;
   end;
 end
else write('Элементы введены неверно');
end.