    c[3]=t/1000;
    c[2]=(t-(c[3]*1000))/100;
    c[1]=(t-((c[3]*1000)+(c[2]*100)))/10; 
    c[0]=(t-((t/10)*10));
    s=0; t=0;}