PROGRAM PASCAL MENAMPILKAN BERAT IDEAL

PROGRAM PASCAL MENAMPILKAN BERAT IDEAL

Berikut ini program pascal untuk menampilkan berat ideal dari tinggi badan yang diinputkan


1.Programnya

program MenampilkanBeratIdeal;
uses crt;
var
   TB,BI  : real ;
begin
     clrscr;
     writeln('Program Menampilkan Berat Ideal');
     write('Input Tinggi Badan :');readln(TB);

     BI :=(TB-100)*0.9;
     Writeln('Berat Ideal(KG)   :',BI:0:0);
     readln;

end.

2.Program dalam Pascal

3.Hasilnya