Jumat, 11 Mei 2012

Manusia Dan Pandangan Hidup

A. Pengertian Pandangan Hidup Setiap manusia mempunyai pandangan hidup yang bersifat kodrati, karena menentukan masa depan seseorang. Pandangan hidup artinya pendapat atau pertimbangan yang dijadikan pegangan, pedoman, arahan, dan petunjuk hidup di dunia. Pendapat atau pertimbangan itu merupakan hasil pemikiran manusia berdasarkan...

Selasa, 08 Mei 2012

Program Deret Bilangan Genap Pada Pascal

Soal Buatlah program menghitung bilangan genap dengan output: 2 4 6 8 10 dst Listing Program program bilangangenap; uses crt; var  i,n:integer; begin  clrscr;  write('Masukkan Angka : ');readln(n);  for i:=1 to n do   write(2*i,' ');  readln; end. Output Program createSummaryAndThumb("summary36585...

Program Deret Bilangan Ganjil Pada Pascal

Soal Buatlah program untuk menghitung bilangan ganjil dengan output : 1 3 5 7 9 dst Listing Program program bilanganganjil;uses crt;var n,i:integer;begin clrscr; write('Masukkan Angka : ');readln(n); for i:= 1 to n do   write (2*i-1,' '); readln;end. Output Program createSummaryAndThumb("summary...

Minggu, 06 Mei 2012

Manusia Dan Keadilan

Pengertian Keadilan Keadilan menurut Aristoteles adalah kelayakan dalam tindakan manusia. Kelayakan diartikan sebagai titik tengah diantara ke dua ujung ekstrem yang terlalu banyak dan terlalu sedikit. Kedua ujung ekstrem itu menyangkut dua orang atau benda. Bila kedua orang tersebut mempunyai kesamaan dalam ukuran yang telah ditetapkan,...

Program Menghitung Derajat Celcius Pada Pascal

Soal Buatlah program untuk menghitung derajat celcius menjadi, reamur, farenheit, dan kelvin! Listing Program  program derajat;uses crt;var c,f,r,k:real;begin clrscr; write('masukkan derajat celcius : ');readln(c); f:=1.8*c+32; r:=c*0.8; k:=c+273; write(c,'derajat celcius adalah ',r, 'derajat reamur...

Program Facktorial Pada Pascal

Soal Buatlah Program menghitung nilai facktorial menggunakan pascal! Listing Program program faktorial; uses crt; var  i,n : integer;  fact: integer; begin clrscr;  write('masukkan angka : ');  readln(n);  fact:=1;   for i:=1 to n do    fact := fact*i;    writeln(n,'! : ',fact);  readln; end. Output...

Program Segitiga Siku Pada Pascal

Soal Buatlah program dengan output seperti dibawah ini : * ** *** **** *****  Listing Program  program segitigabintang;uses crt;var i,j,n:integer;beginclrscr; write('masukkan nilai :');readln(n); for i:=1 to n do  begin   for j:=1 to i do    begin     write('*...

Program Menghitung Gaji Pegawai Pada Pascal

Soal Buatlah program aplikasi untuk menampilkan hasil dan keluaran sebagai berikut: - judul program data penggajian karyawan - inputannya : 1. No induk karyawan                        2. Nama                        3. Golongan   ...