Jawaban:

Berikut adalah program pascal untuk mengkonversi suhu dari Celcius ke Fahrenheit dan Reamur:

pascal

program konversi_suhu;

uses crt;

var

 celcius, fahrenheit, reamur: real;

begin

 clrscr;

 writeln('Program Konversi Suhu');

 writeln('---------------------');

 write('Masukkan suhu dalam Celcius: ');

 readln(celcius);

 // konversi ke Fahrenheit

 fahrenheit := (9/5 * celcius) + 32;

 // konversi ke Reamur

 reamur := 4/5 * celcius;

 writeln('Suhu dalam Fahrenheit: ', fahrenheit:0:2);

 writeln('Suhu dalam Reamur: ', reamur:0:2);

 readln;

end.

Flowchart untuk program di atas dapat digambarkan sebagai berikut:

sql

Start

|

V

Input celcius

|

V

Convert to Fahrenheit

|

V

Convert to Reamur

|

V

Output Fahrenheit and Reamur

|

V

End

Berikut adalah contoh hasil keluaran program jika dijalankan dengan input 25:

markdown

Program Konversi Suhu

---------------------

Masukkan suhu dalam Celcius: 25

Suhu dalam Fahrenheit: 77.00

Suhu dalam Reamur: 20.00

Penjelasan: