Arya Wiguna - DEMI TUHAAAAN !!!!!!!!!!!!!!!!!!!!!!!!!



Membuat Program Konversi Suhu dengan Pascal



Bagi kamu yang mempelajari buku Teknik Pemrogramam Pascal karya Budi Raharjo mungkin agak bingung dengan program Konversi suhu yang ada di latihan BAB IV karena setelah saya coba programnya tidak jalan alias compile failed. Ternyara di sana ada kesalahan sedikit. Di bawah halt(0) itu harus nya ada 2 end; (di buku hanya ada 1).

Programnya spt ini :

Program KonversiSuhu;

uses
crt;
label menu;

var
pilihan : char;
F,C,K,R : real;

begin
menu :
clrscr;
writeln('Program Konversi Suhu');
writeln('---------------------');
writeln;
writeln('Pilih menu berikut dengan menekan tombol 1..4');
writeln('[1] Konversi Celcius - Fahrenheit');
writeln('[2] Konversi Celcius - Reamur');
writeln('[3] Konversi Celcius - Kelvin');
writeln('[4] Keluar Program');
writeln;
write(' Masukan pilihan anda :'); readln(pilihan);
writeln;

case pilihan of
    '1' : begin
                write('Masukan suhu dalam Celcius :');
                readln(C);
                F:=(9/5)*C+32;
                writeln(C:0:2,'Celcius =',F:0:2, 'Fahrenheit');
                end;

    '2': begin
                write('Masukan suhu dalam Celcius'); readln(R);
                R:=(4/5)*C;
                writeln(C:0:2,'Celcius = ',R:0:2,' Reamur');
                end;

    '3': begin
                write('Masukan suhu dalam Celcius'); readln(K);
                K:=C+273;
                writeln(C:0:2,'Celcius - ',K:0:2,'Kelvin');
                end;

    '4' : begin halt(0);
                end;

    end;

    writeln;
    writeln('Tekan sembarang tombol untuk ke menu');
    readln;
    goto menu;

    readln;
    end.

Selamat mencoba.

Download Latihan Soal Matematika IPS



Anak IPS mungkin kurang menyukai matematika. Namun, matematika menjadi salah satu mata pelajaran yang di UN-kan. Jadi mau tidak mau anak IPS pun harus bisa mengerjakan soal soal matematika. 

Agar mahir mengerjakan soal matematika, maka harus menambah pengalaman mengerjakan soal soal nya. Untuk itu, silahkan klik disini untuk mendapatkan soal-soal matematika IPS. Soal-soal ini saya dapatkan dari soalmatematik.com



Download Free Pascal Untuk Linux



Bagi teman-teman yang ingin belajar Pascal tapi menggunakan OS Linux, silakan klik Pascal for Linux untuk download Pascal untuk Linux.

Copyright © 2009 ====================== All rights reserved. Theme by Laptop Geek . | Bloggerized by FalconHive .