汎用機メモっとくか

しごと用の(学習メモ&お気に入り保存)。

わり算02

2023年03月30日 19時16分32秒 | WSH

0割対応は自分でいれてください

試験中

a="7586538575621427759";
lena=a.length;

b='123456789012345';
lenb=b.length;

c=0;
d='';

b01=b.substr(lenb-14,14);
b021="00000000000000" + b.substr(0,lenb-14);
lenb021 = b021.length;
b02= b021.substr(lenb021-14,14);
b05=b02+b01;


posa=0;
a00='';


a00=a00 + a.substr(posa,1);
lena00 = a00.length;
a051 = "0000000000000000000000000000" + a00;
lena051 = a051.length;
a05  = a051.substr(lena051-28,28);


while(posa    lena){
  c=0;
  while(a05 >= b05){
      c++;
      a01=a05.substr(14,14);
      
      if(lena00>14){
         a02=a05.substr(0,14);
      }else{
         a02=0;
      }
      if(a01*1.0     b01*1.0){
       
        a03n1 = 100000000000000 + (a01*1.0);
        a03n2 = (a02*1.0) - 1;       
      }else{
        a03n1 = a01 * 1.0;
        a03n2 = a02 * 1.0;
      }

      a03n1 = a03n1 - (b01 * 1.0);
      a03n2 = a03n2 - (b02 * 1.0);

      if(a03n2 = 0){
        a04 =  "00000000000000" + a03n1;
        lena04 = a04.length;
        a00 = a04.substr(lena04-14,14)
      }else{
        a00 = a03n2 + '';
        a04 = "00000000000000" + a03n1;
        lena04 = a04.length;
        a00 = a00 + a04.substr(lena04 - 14,14);
      }
      lena00 = a00.length;
      a051 = "0000000000000000000000000000" + a00;
      lena051 = a051.length;
      a05  = a051.substr(lena051-28,28);
  }
  posa++;
  a00 = a00 + a.substr(posa,1);
  lena00 = a00.length
  a051 = "0000000000000000000000000000" + a00;
  lena051 = a051.length;
  a05  = a051.substr(lena051-28,28)  


  d = d + '' + c;
}

 

alert(d);

この記事についてブログを書く
« わり算01 | トップ | でっきるかな?PowerShell 007 »