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

}

else if(minus==1&&dot==0)

{i=0;

while(p>=in+1)

{triada[i][3]=*p;

p--;

if(p
triada[i][2]=*p;

p--;

if(p
triada[i][1]=*p;

p--;

if(p
triada[i][0]=*p;

p--;

if(p
i++;

}

strcat(out,"-");

for(j=i;j>=0;j--)

if(strcmp(triada[j],"0000")==0) strcat(out,"0");

else if(strcmp(triada[j],"0001")==0) strcat(out,"1");

else if(strcmp(triada[j],"0010")==0) strcat(out,"2");

else if(strcmp(triada[j],"0011")==0) strcat(out,"3");

else if(strcmp(triada[j],"0100")==0) strcat(out,"4");