Навчальна програма переведення дійсних чисел з 2,8,10,16 у 2,8,10,16 системи числення
while(p<=in+strlen(in))
{triada[i][0]=*p;
p++;
if(p>in+strlen(in)) break;
triada[i][1]=*p;
p++;
if(p>in+strlen(in)) break;
triada[i][2]=*p;
p++;
if(p>in+strlen(in)) break;
i++;
}
for(j=0;j<=i;j++)
if(strcmp(triada[j],"000")==0) strcat(out,"0");
else if(strcmp(triada[j],"001")==0) strcat(out,"1");
else if(strcmp(triada[j],"010")==0) strcat(out,"2");
else if(strcmp(triada[j],"011")==0) strcat(out,"3");
else if(strcmp(triada[j],"100")==0) strcat(out,"4");
else if(strcmp(triada[j],"101")==0) strcat(out,"5");
else if(strcmp(triada[j],"110")==0) strcat(out,"6");
else if(strcmp(triada[j],"111")==0) strcat(out,"7");
}
}
//функція переведення з 2 системи у 10, обробляє вхідний рядок char *in і
//записує результат у вихідний рядок char *out