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

algoritma menentukan temperatur air, contoh algo menentukan wujud zat, bentuk program menentukan temperarur dan wujud h2o, cara mengetahui bentuk gas, flowchart dan program dalam bahasa BASICjika suhu lebih kecil sama dengan 0 maka wujudnya padat, penggunaan case dalam menentukan wujud air, program if untuk wujud air php, program php if untuk menentukan padat cair gas.

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.