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

case 'C': x+=12*pow(16,strlen(in)-i-1); break;

case 'D': x+=13*pow(16,strlen(in)-i-1); break;

case 'E': x+=14*pow(16,strlen(in)-i-1); break;

case 'F': x+=15*pow(16,strlen(in)-i-1); break;

case '0': x+=0*pow(16,strlen(in)-i-1); break;

default : strcpy(out,"Error"); break;

};}x*=-1;}

else

{i=0;

for(p=strchr(in,'.')-1;p>in;p--)

{switch(*p)

{case '1': x+=1*pow(16,strlen(in)-i-1); break;

case '2': x+=2*pow(16,strlen(in)-i-1); break;

case '3': x+=3*pow(16,strlen(in)-i-1); break;

case '4': x+=4*pow(16,strlen(in)-i-1); break;

case '5': x+=5*pow(16,strlen(in)-i-1); break;

case '6': x+=6*pow(16,strlen(in)-i-1); break;

case '7': x+=7*pow(16,strlen(in)-i-1); break;

case '8': x+=8*pow(16,strlen(in)-i-1); break;

case '9': x+=9*pow(16,strlen(in)-i-1); break;

case 'A': x+=10*pow(16,strlen(in)-i-1); break;

case 'B': x+=11*pow(16,strlen(in)-i-1); break;

case 'C': x+=12*pow(16,strlen(in)-i-1); break;

case 'D': x+=13*pow(16,strlen(in)-i-1); break;

case 'E': x+=14*pow(16,strlen(in)-i-1); break;