помогите перевести с паскаля на с++uses crt;var x,y,i:integer;begin repeat

Помогите перевести с паскаля на с++


uses crt;
var x,y,i:integer;
begin repeat begin
writeln('vvedite 2-oe chislo');
readln(i); if (igt;99)or(ilt;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.

Ева Штефанко 2019-09-12 10:08:10

что за begin после repeat?

Нина 2019-09-12 10:10:54

В паскале, для цикла с постусловием, не необходимо очевидно указывать начало и конец. Его тело начинается от слова repeat и заканчивается словом until.