BMI計算

ソース

プログラム

「BMI計算」のラベル作成。
それの「文字サイズ」に「250%」をDOMスタイル設定。
改行作成。
「2項目入力すると、残りの項目を計算します。」のラベル作成。
改行作成。
「身長：」のラベル作成。
身長欄は空のエディタ作成。
「cm」のラベル作成。
改行作成。
「体重：」のラベル作成。
体重欄は空のエディタ作成。
「kg」のラベル作成。
改行作成。
「BMI：」のラベル作成。
BMI欄は空のエディタ作成。

身長欄に1をDOMポケット設定。
体重欄に2をDOMポケット設定。
BMI欄に4をDOMポケット設定。

前回入力された欄は0。
今回入力された欄は0。

●(AとBが)有効とは
  もし、AをNAN判定ならば、偽を戻す。
  もし、Aが0以下ならば、偽を戻す。
  もし、BをNAN判定ならば、偽を戻す。
  もし、Bが0以下ならば、偽を戻す。
  真を戻す。
ここまで。

●計算処理とは
  定数の最新変化は対象のDOMポケット取得。
  もし、それが今回入力された欄と等しく無いならば
    前回入力された欄は今回入力された欄。
    今回入力された欄は最新変化。
  ここまで。

  定数の身長は身長欄のテキスト取得して実数変換。
  定数の体重は体重欄のテキスト取得して実数変換。
  定数のBMIはBMI欄のテキスト取得して実数変換。
  定数のメートル身長は身長を100で割る。

  定数の入力された欄は前回入力された欄と今回入力された欄のOR。
  もし、入力された欄が3と等しいならば
    # 身長と体重からBMIを求める
    もし、身長と体重が有効ならば
      BMI欄に体重÷メートル身長÷メートル身長をテキスト設定。
    違えば
      BMI欄に「エラー」をテキスト設定。
    ここまで。
  違えば、もし、入力された欄が5と等しいならば
    # 身長とBMIから体重を求める
    もし、身長とBMIが有効ならば
      体重欄にBMI×メートル身長×メートル身長をテキスト設定。
    違えば
      体重欄に「エラー」をテキスト設定。
    ここまで。
  違えば、もし、入力された欄が6と等しいならば
    # 体重とBMIから身長を求める
    もし、体重とBMIが有効ならば
      体重÷BMIの平方根を100倍して身長欄にテキスト設定。
    違えば
      身長欄に「エラー」をテキスト設定。
    ここまで。
  ここまで。
ここまで。

[身長欄, 体重欄, BMI欄]を反復
  {関数}計算処理で対象の変更された時。
ここまで。

作品について

作品情報

作品を編集

みけCAT 作

ライセンス: CC0（著作権破棄）
形式: wnako
タグ: -
利用バージョン: 3.7.16
アクセス数(累計): 8
アクセス数(今月): 8
更新日時: 2026/04/05 23:20 編集: 2026/04/05 23:27

作品公開情報

交流

BMI計算

プログラム

作品情報

コメント