Program Berat

Jun 27, 2009 No Comments by Sahabat

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.

Kata Kunci

type program record dan array yg menentukan nomor nama jenis kelamin umur tinggu badan berat badan ideal, conth berat badan ideal dalam pemograman pascal.

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau
No Responses to “Program Berat”

Leave a Reply

You must be logged in to post a comment.