Program Suhu

Jun 27, 2009 No Comments by Sahabat

Program_suhu;
uses crt;
var suhu : integer ;
begin
write ( ‘ suhu tubuh: ‘ ) ; readln (suhu) ;
if suhu < 28 then writeln ( ' suhu rendah ' ) ; else if suhu > 37 then
writeln ( ‘ suhu tinggi ‘ ) ;
else
writeln ( ‘ normal ‘ ) ;
writeln ( ‘ selasai ‘ ) ;
readln ;
end.

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 Suhu”

Leave a Reply

You must be logged in to post a comment.