如何将这个turbo pascal代码转换为turbo c ++？

Question

八个月前我学习了turbo pascal，现在我正在学习turbo c ++，到目前为止我只知道如何将writeln和readln翻译成turbo c ++。任何人都可以帮我把这个代码从turbo pascal翻译成turbo c ++吗？谢谢：）

b:=3;c:=5;
while(b<c)do
begin
       x:=65;y:=10;
       z:=13;a:=13;
while(x>y)do
begin
         textcolor(0);textbackground(red);
         gotoxy(z,13);writeln('Û');
         gotoxy(a,13);writeln('  ');
    x:=x-1;
    a:=a+1;
    z:=z+1;
    delay(1000);
end;
end;
end.