Из паскаля в С++

@Дмиттрий · Регистрация: 03.12.2015

Author24 — интернет-сервис помощи студентам

Ребят, помогите, пожалуйста, перевести из паскаля в С++, буду благодарен за помощь. Заранее спасибо.

Pascal

program example1; 
  var 
    V:array[1..100,1..100] of integer; 
      m,n, i,j, c: integer; 
         flag: boolean; 
begin 
       write('Введите размерность массива m-n> '); readln(m,n); 
         for i:= 1 to m do 
            for j:= 1 to n do begin 
               write('V[',i,',',j,']= '); readln(V[i,j]); 
  end; 
    for i:=1 to m do 
      repeat 
          flag:= true; 
              for j:=1 to n-1 do 
           if (v[i,j]=0) and (v[i,j+1]<>0) then begin 
         c:=v[i,j]; v[i,j]:=v[i,j+1]; v[i,j+1]:=c; 
      flag:= false; 
  end; 
     until flag; 
      for i:= 1 to m do begin 
         for j:= 1 to n do write(V[i,j]:2);
         writeln
     end; 
  readln; 
end.

@ExXtaZzyUA · 27.02.2017, 00:17

C++

int array[100][100]; 
int m, n, i, j, c; 
bool flag; 
 cout<<"Введите размерность массива"<<endl;
 cin>>m;
 cin>>n;
         for (int i = 1; i < m; i++) 
            for (int j = 1; j < n; j++)
               cout<<"["<<i<<":"<<j<<"] = "<<array[i][j]<<endl;
    for (int i=1; i<m;i++) 
      repeat \\ не знаю что это
          flag= true; 
              for (int j=1; j<n-1; j++) 
                if (v[i,j]=0 && v[i,j+1](<> тоже хз что это)0)
                {
                  c=v[i,j]; 
                  v[i,j]=v[i,j+1]; 
                  v[i,j+1]:=c; 
                  flag:= false;
                 } 
     until flag; \\ не знаю
      for (int i= 1; i<m;i++) 
         for (int j= 1; j<n; j++);
          cin>>V[i,j]/2;

Добавлено через 28 секунд
Но это не точно

@sk007 · 27.02.2017, 12:22

Сообщение от ExXtaZzyUA

repeat-until \\ не знаю что это

по нашему, это цикл do-while()

Сообщение от ExXtaZzyUA

<> тоже хз что это

больше или меньше. т.е. оператор не равен(!=)

@ExXtaZzyUA · 27.02.2017, 12:25

sk007, Ясно понятно) Думаю человек допереведет

@sk007 Life Builder 532 / 496 / 374 Регистрация: 12.01.2011 Сообщений: 1,754
	27.02.2017, 12:22	3
	Сообщение от ExXtaZzyUA repeat-until \\ не знаю что это по нашему, это цикл do-while() Сообщение от ExXtaZzyUA <> тоже хз что это больше или меньше. т.е. оператор не равен(!=) 0

@ExXtaZzyUA 15 / 15 / 6 Регистрация: 30.11.2016 Сообщений: 101
	27.02.2017, 12:25	4
	sk007, Ясно понятно) Думаю человек допереведет 0