1. Kalkulator Penghitung Berat Badan
CARA PENULISAN SYNTAX :
HASIL PROGRAM
PENJELASAN
Program ini menggunakan fungsi IF THE ELSE.
Pertama kita membuat kuisioner pada program yaitu dengan input Tinggi badan dan berat badan. Lalu kita hitung dengan rumus berat ideal = tinggi badan-110. Setelah itu kita masukkan pada logika apakah berat badan > berati ideal? jika ya berarti berat badan dinyatakan berlebihan. Jika tidak apakah berat badan < berat ideal? jika ya berat badan dinyatakan kurang. Jika tidak maka dinyatakan ideal.
Tulisan ini terinspirasi dari tugas mata kuliah saya saat ini yaitu Pemrograman Dasar di prodi Rekam Medik POLITEKNIK NEGERI JEMBER.
Terimakasih kepada :
Dosen Pembimbing, Ibu Sustin Farlinda, S.Kom, M.Kom.
CARA PENULISAN SYNTAX :
program beratbadan_ideal;
uses crt;
var
bb,tb,bi,tr,nk:real;
const
pembatas='*********************************************';
begin
clrscr;
writeln('SELAMAT DATANG DI PROGRAM ANALISA BERAT BADAN');
writeln('BY RENDI ADIANSA G41151090');
writeln('Golongan C Prodi Rekam Medik');
writeln(pembatas);
writeln;
write('Masukkan tinggi tubuh Anda [cm] : '); readln(tb);
write('Masukkan berat badan Anda [kg] : '); readln(bb);
bi:=tb-110;
write('Berdasarkan perhitungan umum, maka berat badan anda dinyatakan ');
if bb>bi then
begin
writeln('BERLEBIHAN');
write('Seharusnya, berat badan anda : ');
writeln(bi:2:0);
tr:=bb-bi;
write('Anda kami sarankan untuk menurunkan berat badan anda seberat : ');
write(tr:0:0);
end
Else
if bb
begin
writeln('KURANG');
write('Seharusnya berat badan anda : ');
writeln(bi:2:0);
write('Anda kami sarankan untuk meningkatkan berat badan anda seberat : ');
nk:=bi-bb;
write(nk:0:0);
end
else
write('IDEAL, pertahankan!');
readln;
end.
HASIL PROGRAM
PENJELASAN
Program ini menggunakan fungsi IF THE ELSE.
Pertama kita membuat kuisioner pada program yaitu dengan input Tinggi badan dan berat badan. Lalu kita hitung dengan rumus berat ideal = tinggi badan-110. Setelah itu kita masukkan pada logika apakah berat badan > berati ideal? jika ya berarti berat badan dinyatakan berlebihan. Jika tidak apakah berat badan < berat ideal? jika ya berat badan dinyatakan kurang. Jika tidak maka dinyatakan ideal.
Tulisan ini terinspirasi dari tugas mata kuliah saya saat ini yaitu Pemrograman Dasar di prodi Rekam Medik POLITEKNIK NEGERI JEMBER.
Terimakasih kepada :
Dosen Pembimbing, Ibu Sustin Farlinda, S.Kom, M.Kom.
No comments:
Post a Comment