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

flowchart untuk memasukan suhu dalam celcius t jika t<0 maka padat 0<=t<=100, flowchart untuk memasukkan suhu dalam celcius, membuat algoritma wujud sebuah benda, wujud air berdasarkan suhu, pemrograman else dan if pada suhu air gas padat, Deskripsi suatu dalam celcius beku cair dan gas, contoh flowchat algoritma program konversi suhu dari celcius ke fahrenheit, Contoh flowchart dari celcius ke Fahrenheit tampilkan juga wujud air padat cair atau gas, wujud cair padat gas pada celcius, beku dan tidak beku dev c.

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.