Перевести программы с языка C++ на язык Паскаль: 1.
int a,b;
cin » a»b;
a = 2* a;
if(a >b){a = 2*b;}
else if (a else if(a==b){a = a + b;}
cout « a;
2.
int x = 64;
int y = 40;
while(x!=y){
if(x>y){
x = x - y;
}else{
x = y-x;
}
}
dct
int a,b;
cin » a»b;
a = 2* a;
if(a >b){a = 2*b;}
else if (a else if(a==b){a = a + b;}
cout « a;
2.
int x = 64;
int y = 40;
while(x!=y){
if(x>y){
x = x - y;
}else{
x = y-x;
}
}
dct
More Questions From This User See All