BMI値の計算のプログラム

会員540円 | 非会員648円
ダウンロード カートに入れる
ページ数2
閲覧数782
ダウンロード数5
履歴確認

    ファイル内検索

    資料の原本内容( この資料を購入すると、テキストデータがみえます。 )

    2004年前期 情報処理基礎演習 
    program BMI;
    {$APPTYPE CONSOLE}
    uses
    SysUtils;
    var a,b,c:real;
    begin
    <身長の入力>
    write('あなたの身長は?(単位m)'); readln(a);
     <体重の入力>         
    write('あなたの体重は?(単位kg)'); readln(b);  
    <BMIの計算>        
    c:=round(b/sqr(a));                        
    <BMIの条件による判定>
    if c>=25 then write('あなたのBMIは',c:3:2,'..

    コメント2件

    kippei 購入
    b
    2007/01/30 15:53 (9年10ヶ月前)

    kentaro1214 購入
    参考になりました。
    2007/02/03 18:35 (9年10ヶ月前)

    コメント追加

    コメントを書込むには会員登録するか、すでに会員の方はログインしてください。