Logo Cakra Buana Wijaya Kusuma (pramuka)

-
Logo Cakra Buana, badge Untuk ambalan putra SMA NEGERI 2 KENDAL
Blogger Sakti Majid @adisakti_jrs

Komentar

Posting Komentar

Postingan populer dari blog ini

Alasan Mengapa Kelvin Dijadikan Satuan Suhu Internasional

-
Gambar
Dok. Pribadi Sejak tahun 1960 dunia mulai menggunakan Sistem Satuan Internasional yang disingkat SI, yang dalam bahasa Inggris disebut International System of Unit atau dalam bahasa Perancis le System International d’unites. Sistem ini merupakan hasil kesepakatan dari CGPM (Conference General des Poids et Measures) di Paris, Perancis. Dan pada CGPM 13 Tahun 1967 memuat perjanjian yang salah satu dari kesepakatan tersebut yaitu penggunaan Kelvin sebagai satuan suhu internasional. Dalam penerapan kesepakatan penggunaan Kelvin tersebut berdasarkan beberapa alasan, berikut beberapa alasan mengapa Kelvin lebih dipilih dibandingkan dengan satuan lainnya:   Titik Terendah dalam Kelvin adalah 0 K dan pada suhu tersebut energi atom berada pada level paling rendah (minimum). Tidak ada lagi kuantum energi yang lebih rendah yang bisa dimiliki oleh sebuah atom selain level energi tersebut. Oleh karena itu pada Kelvin tidak harus menggunakan tanda minus, dengan kata lain lebih efisien d...
Baca selengkapnya

Program Menghitung Jumlah dan Rata-Rata Bilangan Ganjil Genap Pascal

-
Gambar
Program dalam bahasa Pascal untuk menghitung jumlah dan rata-rata bilangan ganjil genap. Coding untuk meghitung jumlah dan rata-rata bilangan ganjil dan genap. Programnya dapat dilihat dibawah ini: program hitung_genap_ganjil; uses crt; var    N,i,a, ganjil,genap : integer;    jumlahganjil, jumlahgenap : integer;    rataganjil, ratagenap : real; begin    clrscr;    jumlahganjil:= 0;    jumlahgenap:= 0;    genap:= 0;    ganjil:= 0;    write('masukan jumlah data: ');    readln(N);    for i:= 1 to N do    begin       write('masukan data ke-',i,': ');       readln(a);       if a mod 2 = 0 then       begin          genap:= genap + 1;          jumlahgenap:= jumlahgenap + a;       end       else    ...
Baca selengkapnya

Procedure Parameter Luaran Menghitung Rata-Rata Pascal (coding)

-
Gambar
Codepamulang. Program Pascal tentang penggunaan Prosedur/Procedure dengan parameter Luaran untuk menghitung rata-rata N buah bilangan. Programnya dapata dilihat dibawah ini: program menghitung_rerata; uses crt; var    N : integer;    rerata : real; procedure hitung(N: integer; var u: real);    var       a,b : integer;       jumlah: real;    begin       for a:= 1 to N do       begin          write('Masukan nilai ke-',a,' = ');          readln(b);          jumlah:= jumlah+b;       end;       u:= jumlah/N;    end; begin    clrscr;    writeln('-----Menghitung Rerata Nilai-----');    writeln();    write('Masukan jumlah data inputan = ');    readln(N);    hitung(N, rerata);    writ...
Baca selengkapnya