Berikut ini adalah pertanyaan dari ainainiazzahra5 pada mata pelajaran TI untuk jenjang Sekolah Menengah Atas
Jawaban dan Penjelasan
Berikut ini adalah pilihan jawaban terbaik dari pertanyaan diatas.
Jawaban:
var
x : integer;
reamur :real;
fahrenheit:real;
begin
x :=suwal;
while (x<=sukir) do
begin
reamur=4/5*x;
fahrenheit=(9/5*x)+32;
Memo1.lines.add(inttostr(x) +\t + realtostr(reamur)+ \t +realtostr(fahrenheit) ;
x=x+interval;
end;
Penjelasan:
mohon maaf tidak bisa test, sudah lama tidak pakai delphi, untuk tampilan bisa disesuaikan, type datanya pecahan(real) to str, \t itu maksudnya tab semoga membantu.
Semoga dengan pertanyaan yang sudah terjawab oleh sikippy dapat membantu memudahkan mengerjakan soal, tugas dan PR sekolah kalian.
Apabila terdapat kesalahan dalam mengerjakan soal, silahkan koreksi jawaban dengan mengirimkan email ke yomemimo.com melalui halaman Contact
Last Update: Sat, 31 Jul 21