Навчальна програма переведення дійсних чисел з 2,8,10,16 у 2,8,10,16 системи числення

else if((int)y==9) strcat(out,"9");

else if((int)y==10) strcat(out,"A");

else if((int)y==11) strcat(out,"B");

else if((int)y==12) strcat(out,"C");

else if((int)y==13) strcat(out,"D");

else if((int)y==14) strcat(out,"E");

else if((int)y==15) strcat(out,"F");

y-=(int)y;

}else strcat(out,"0");

if(y==0)break;

}

}

}

//функція переведення з 16 системи у 2, обробляє вхідний рядок char *in і записує

//результат у вихідний рядок char *out

void Hex2Bin(char *in,char *out)

{char *p,e=1;

strcpy(out,"");

for(p=in;p
{switch(*p)

{case '1': strcat(out,"0001"); break;

case '2': strcat(out,"0010"); break;

case '3': strcat(out,"0011"); break;

case '4': strcat(out,"0100"); break;

case '5': strcat(out,"0101"); break;