Program Matlab untuk Mengkonversi Suhu



disp('Program Mengkonversi Suhu')
disp('C = Derajat Celcius')
disp('F = Derajat Fahrenheit')
disp('R = Derajat Reamur')
disp('K = Derajat Kelvin')
disp('--------------------------------')
a = input('Masukan satuan suhu asal : ','s');
suhu = input('Masukan Nilai Suhu : ');
if  a == 'C'
    C = suhu;
    R = (4/5)*C;
    F = 9/5*C+32;
    K = C+273;
elseif a == 'F'
   F = suhu;
   R = (4/9)*F-32;
   C = (5/9)*F-32;
   K = C + 273;
elseif a == 'R'
   R = suhu;
   C = (5/4)*R;
   F = ((9/5)*R)-32;
   K = C+273;
elseif a == 'K'
    K = suhu;
    C = K-273;
    R = (4/5)*C;
    F = ((9/5)*C) + 32;
else
    disp(' Pilih C,F,R atau K')
    break;
end
fprintf('Tingkat suhu %.2f derajat %s setara dengan\n',suhu,a)
fprintf('Suhu dalam Reamur      : %.2f derajat R\n',R)
fprintf('Suhu dalam Celcius     : %.2f derajat C\n',C)
fprintf('Suhu dalam Fahrenheit  : %.2f derajat F\n',F)
fprintf('Suhu dalam Kelvin      : %.2f derajat K\n',K)