Menentukan Bentuk Padat, Cair, Gas Benda

Jul 25, 2009 2 Comments by Sahabat

Program untuk menentukan bentuk padat, cair, atau gas benda :

uses wincrt;
var a: integer;
ket: string;
begin
write ('suhu  : '); readln (a);
if a <= 0 then
ket :='padat'
else
if (a > 0) and (a < 100) then
ket :='cair'
else
if a >=100 then
ket :='gas';
writeln('Air pada suhu tersebut berbentuk',' ',ket);
end.

Gunawan Setya Putra
gunawansp@rocketmail.com

Kata Kunci

wujud air berdasarkan suhu, algoritma wujud padat cair dan gas, contoh program pascal keadaan zat, flowchart menentukan suhu padat cair gas, flowchat menghitung zat, menentukan h20 gas padat dan cair menggunakan algoritma, menghitung padat-cair, program pascal suhu dan wujud zat.

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

2 Responses to “Menentukan Bentuk Padat, Cair, Gas Benda”

  1. estu says:

    tanya dund mz.
    program untuk konversi suhu menggunakan c++ builder gimana ya mas?
    makasih

  2. aufanuri says:

    maaf, mohoi bantuannya. bagaimana menuliskan kode program pascal untuk soal mengubah angka menjadi terbilang. misal 234 = dua ratus tiga puluh empat. Terima kasih..

Leave a Reply

You must be logged in to post a comment.