掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
配列を用いてプログラムをつくるには？ (ID：26685)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
筆算を力ずくでプログラミングしてみました。 合ってますか？ var S:string; i:integer; S:='1'; for i:=1 to 100 do S:=MultiM(S,2); showmessage(S); //--------------------------------------------- function TForm1.MultiM(S: string; m: integer): string; var i,k,jk:integer; aSt:string; begin jk:=0; aSt:=''; for i:=length(S) downto 1 do begin k:=strtoint(S[i])*m+jk; jk:=k div 10; k:=k mod 10; aSt:=inttostr(k)+aSt; end; if jk>0 then aSt:=inttostr(jk)+aSt; result:=aSt; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.