PowerShell 丸め 筋肉量計算 + 基礎代謝

筋肉量計算に基礎代謝を追加して、四捨五入で小数点1位まで表示するように変更

 

function fround($val) # 小数点第二位を四捨五入して第一位までの値とする。

{

    $num = [Math]::Round($val, 1, [MidpointRounding]::AwayFromZero);

    return $num

}

# 体重と体脂肪率の入力

$iWeight = Read-Host "体重（㎏）　　"

$iSibou = Read-Host  "体脂肪率（％）"

$Sibou=1* $iSibou

$Weight=1* $iWeight

$SibouRyou=$Weight * ($Sibou/100)

$jyosiboutaijyuu = $Weight - $SibouRyou

$KinnikuRyou = $jyosiboutaijyuu /2

$KinnikuRitu =$KinnikuRyou / $Weight *100

# 30．9％以下は低い

# 31．0～34．9％は標準

# 35．0～38．9％はやや高い

# 39．0％以上は高い

$kMark = "低い"

$kColor = "Red"

if (( $KinnikuRitu -ge 31 ) -and ( $KinnikuRitu -lt 35 ))

{

    $kMark = "標準"

    $kColor = "White"

}

if (( $KinnikuRitu -ge 35 ) -and ( $KinnikuRitu -lt 39 ))

{

    $kMark = "やや高い"

    $kColor = "Green"

}

if ( $KinnikuRitu -ge 39 ) 

{

    $kMark = "高い"

    $kColor = "Cyan"

}

$kiso = fround (370 + 21.6 * $jyosiboutaijyuu)

write-host "`r`n基礎代謝  　= "　$kiso "Cal"   

$wVal =  fround($SibouRyou)

write-host "`r`n体脂肪量　　= "　$wVal "Kg"

$wVal =  fround($jyosiboutaijyuu)

write-host "除脂肪体重　= "　$wVal "Kg"

$wVal =  fround($KinnikuRyou)

write-host "筋肉量　　　= "　$wVal "Kg"

$wVal =  fround($KinnikuRitu)

write-host "筋肉率　　　= "　$wVal "%" $kMark -ForegroundColor  $kColor 

実行結果

本日の河上選手：お休み

　11/26　～　　　江戸川