Pascal Program Mencari Derajat Suhu

mencari derajat suhu dengan menggunakan pascal , ni dia...
uses wincrt;
var
c,k,f : real;
begin
write ('masukkan derajat celcius = ');
readln (c);

k:= 273 + c;
f:= 1.8*c +32;

writeln ('derajat kelvin = ',k:0:2);
write ('derajat fahrenheit = ',f:0:2);
end.

You May Like :

0 Response to "Pascal Program Mencari Derajat Suhu"