ハム活動記/2023-08-12 の履歴(No.1)

• 履歴一覧
• 差分 を表示
• 現在との差分 を表示
• ソース を表示
• ハム活動記/2023-08-12 へ行く。
  • 1 (2023-08-12 (土) 08:11:18)

ハム活動記

割り勘†

いやーっ！参ったよ。酔ったところで割り勘の計算。会計の私にはチョットムリ。
飲んだ人には少し負担増にして、飲まなかった人はそれなりに・・・

これを計算なんて・・・ほろ酔いの私には少々荷が重い

そこで

関数電卓に「WARIKAN」プログラムをコーディングしてみた

　"DAIKIN"?->D 　"KAIHI"?->K 　"NINZUU"?->N 　"SAKE"?->S 　"SAKE %"->P 　P/100->W 　(D-(K*N))->F

　(F*W/S)+K->T 　Locate 1,4,T

　While 1 　"CYOSEI"?->G

If G=0
Then Return
IfEnd

　(D-G*S)/(N-S)->H 　Locate 1,2,G 　Locate 9,2,H 　whileEnd

こんな感じ