Перевести с паскаля на с++ uses crt; var x,y,i: integer; begin repeat begin writeln('vvedite 2-oe chislo'); readln(i); if (i> 99)or(i< 10) then writeln('vv 2-xzn chislo') else begin x: =i mod 10; y: =i div 10; if ((x=4) or (x=7) or (y=4) or (y=7)) then writeln('vhodiat 4, 7') else writeln('ne vhodiat 4, 7'); if (x=3) or (x=6) or (x=9) or (y=3) or (y=6) or (y=9) then writeln('vhodiat 3, 6, 9') else writeln ('ne vhodiat 3,6,9'); end; end; until i=0; end.
