program berat badan

Bagi anda yang bermasalah dengan berat badan, contoh program di bawah ini cocok sekali dengan masalah yang sedang dihadapi, khususnya kaum hawa, hehe cuma becanda ding, listing program di bawah ini sekedar buat iseng saja, sekaligus belajar pemrograman buat kita semua.
Apakah yang dimaksud dengan Body Mass Index?
Body Mass Index (BMI) merupakan pengukuran yang membandingkan berat dan tinggi badan seseorang. Meski nilai yang dihasilkan dari formula BMI bukan sebagai patokan jumlah lemak dalam tubuh, namun nilai BMI bisa dijadikan perkiraan apakah seseorang memiliki tubuh yang ideal dari perbandingan tinggi dan berat badannya.
Formula BMI digunakan di seluruh dunia sebagai alat diagnosa untuk mengetahui problem berat badan seperti terlalu kurus, kurus, normal, atau gemuk. Pengelompokkan hasil BMI telah menjadi standar dan ditetapkan oleh WHO. Di Asia nilai BMI yang berlaku berbeda dengan nilai BMI di negara Barat.
BMI = Berat (dalam kg) / Tinggi² (dalam meter)
Hasil perhitungan BMI untuk orang di Asia Tenggara dikelompokkan sebagai berikut:
Untuk kategori Sangat Kurus, berada pada BMI Kurang dari 14,9.
Untuk kategori Kurus, berada pada BMI 15 - 18,4.
Untuk kategori Normal, berada pada BMI 18,5 - 22,9.
Untuk kategori Gemuk, berada pada BMI 23 - 27,5.
Untuk kategori Kegemukan, berada pada BMI 27,6 - 40.
Untuk kategori Sangat Gemuk, berada pada BMI Di atas 40.
Nilai perhitungan dari formula BMI lebih cocok digunakan oleh orang dewasa. Untuk anak-anak, wanita hamil, dan orang yang sangat berotot, maka nilai BMI tidak dapat digunakan.
Nilai BMI juga bisa menentukan besarnya risiko terkena penyakit akibat berat badan seperti Jantung dan Diabetes.
Jadi dari perhitungan pada kotak di atas, apakah Anda termasuk kurus, ideal, atau gemuk? Silahkan coba dengan alat hitung ini untuk mengetahui berat badan Anda, keluarga, dan teman-teman Anda.

Program Berat_badan ;
uses crt ;
var berat : integer ;
begin
write ( ‘ masukkan berat badan : ‘ ); readln (berat) ;
if berat > 37 then
writeln (‘berat’);
else
writeln ( ‘ kurus ‘ ) ;
readln ;
end

Demikian Listing program tentang berat badan, Semoga bermanfaat ya. Baca juga program data mahasiswa.