Перевод на С++ (Pascal)

[spinogryz_ua]

Program p1;
 Uses crt;
 const n = 67;

 Var  matrix: array [1..n] of integer;
     i,p,q:integer;

begin
 writeln('p-?'); read (p);
  writeln('q-?'); read (q);
if (p>q) and (p>0) and (q>=0) then
  begin
  for i := 1 to n do
   begin
           matrix[i] := Random(90)+10;
           write( matrix[i],' ')
     end;
writeln;writeln;
  for i := 1 to n do
    begin
      if abs(matrix[i]) mod p=q then  matrix[i]:=0;
       write( matrix[i],' ')
    end;
 end

else  writeln( '(p>q) and (p>0) and (q=>0)');
readln;
end.

[Stilet]

примерно так:

 const int n = 67;

 int matrix[n],i,p,q;
int main(){
 printf("p-?"); scanf("%d",&p);
 printf("q-?"); scanf("%d",&q);
if (p>q && p>0 && q>=0) {
  //begin
  for(i=1,i<n<i++){ // do
   //begin
           matrix[i] = rand()%90+10;
           printf("%d\t", matrix[i]);
     }//end;
//writeln;writeln;
printf("\n\n");
   for(i=1,i<n<i++){ //do
   // begin
      if (abs(matrix[i])%p==q) {/* then */ matrix[i]/*:*/=0;}
      printf("%d\t", matrix[i]);
    }//end;
 } //end

else  printf("(p>q) and (p>0) and (q=>0)");
getchar();
return 0;
} //end.

[O'neeL]

Только циклы объявлять нужно, наверное, иначе:

for(i = 0; i < n; i++)

[Stilet]

Не спорю