Programación de habilidades de mono
# incluir ltiostream gt
Usar espacio de nombres std
int sum(int a[], int x)
{
int i, b = 0;
for(I = 0; iltx; i )b = b a[I];
Regresar
} p>
int main()
{
int a[100], m, n, I, b =-1
CIN gtm; gt gtn;
for(I = 0;iltm;i)a[I]= 1;
mientras(suma(a,m)!=1)
{
para(I = 0;iltn;i)
{
b;
si (b = = m)b = 0;
si(a[b]= = 0)I-;
}
a[b]= 0; p>
cout lt ltb 1 lt; lt"Número eliminado\n";
}
for(I = 0; a[I]= = 0; i ) ;
cout lt I 1 lt; lt" el número es rey\n"
Devuelve 0;