Program Uas_Praktikum_B;
Uses Crt;

Procedure P_Pangkat (a:real; b:integer; hasil:real);
var x:integer;
Begin
For x:=1 to b do
Begin
hasil:=hasil*a;
end;
end;

Function Faktorial (a:integer):integer;
var fakt,y:integer;
begin
fakt:=1;
for y:=a downto 1 do
begin
fakt:=fakt*y;
end;
faktorial:=fakt;
end;

Function F_pangkat (a:real; b:integer): real;
Var hasil:real;
i:integer;
begin
i:=1;
hasil:=1;
while i<=b do begin hasil:=hasil*a; i:=i+1; end; f_pangkat:=hasil; end; Procedure Kualifikasi (HM: char;var kuat: string); begin case HM of 'A' : Kuat:='Memuaskan'; 'B' : Kuat:='Baik'; 'C' : Kuat:='Cukup'; 'D' : Kuat:='Kurang'; 'E' : Kuat:='Sangat Kurang'; end; end; Function HurufMutu (Angkamutu: integer): Char; Begin if Angkamutu >= 80 then
Hurufmutu:='A'
else
if angkamutu >= 60 then
Hurufmutu:='B'
else
if angkamutu >= 50 then
Hurufmutu:='C'
else
if angkamutu >= 40 then
Hurufmutu:='D'
else
Hurufmutu:='E';
End;

Function Sinus (Derajat:Integer):real;
Var rad,hasil:real;
z: integer;

Begin
rad:=derajat*pi/180;
hasil:=0;
For z:=1 to 7 do
begin
Hasil:= hasil+F_pangkat (-1,z+1)* F_pangkat (rad,(2*z)-1)/faktorial ((2*z)-1);
end;
Sinus:=Hasil;
End;


VAR
Nilai: Integer;
nDerajat: Integer;
nKualifikasi: String;
Begin
Clrscr;
nDerajat:=30;
Nilai:=50;
Writeln ('Nilai Sinus Dari ',nDerajat,' adalah ', sinus (nDerajat):2:2);
Writeln;
Writeln ('Jika Mahasiswa Mendapat Nilai ', Nilai);
Writeln ('Maka Dia Mendapat Huruf Mutu ', HurufMutu(Nilai));
Kualifikasi (Hurufmutu(Nilai),nKualifikasi);
Writeln ('Kualifikasi Mahasiswa tersebut: ', nKualifikasi);
readln;
End.

Silahkan Untuk Download Klik dibawah.

Download ARIP_B.PAS

Berawal sejak merekomendasikan seorang teman membeli sebuah laptop baru merk Compaq karena melihat price to performance nya yang lebih menguntungkan dibandingkan dengan merk lain. Akhirnya diputuskan untuk membeli Compaq CQ40-108TU yang berprocessor Intel Dual Core, dengan harga yang bisa dibilang lebih kompetitif membuat beberapa hal dalam paket penjualan terpaksa dipangkas. Ditiadakannya bundling sistem operasi lumayan menurunkan harga, bahkan hal yang krusial seperti drivers CD pun tidak ikut disertakan.
Saat akan meng-install sistem operasi Windows XP, ternyata driver yang ada di dalam CD MS Windows XP tidak dapat mengenal jenis hard drive yang terpasang pada laptop, hasilnya proses instalasi tidak dapat dilanjutkan. Kemudian mencoba menggunakan DVD Windows Vista, ternyata semua proses berjalan lancar dan normal. Saat telah selesai pun tidak perlu menginstall kembali driver-driver yang dibutuhkan, karena semua sudah dikenali dan terkonfigurasi dengan baik oleh MS Windows Vista, kecuali untuk WiFi dan web cam.
karena beberapa pertimbanga, pemilik menginginkan mesin nya di-install dengan MS Windows XP, cari-cari cara meng-install Windows XP pada mesin Compaq CQ40 ternyata membutuhkan remastering untuk memasukkan driver hard drive ke dalam CD instalasi MS Windows XP. Ahirnya coba-coba remastering berdasarkan tutorial yang diberikan. Berikut langkah-langkah nya :
  1. Kita membutuhkan sebuah PC atau laptop yang telah terinstall sistem operasi Windows di dalamnya. Download dan install aplikasi Microsoft .Net Framework dan nLite secara berurutan, dan download driver SATA AHCI yang diperlukan di alamat berikut :
  2. Siapkan CD Windows XP yang asli. Ingat, harus yang ASLI lengakap dengan product key nya.
  3. Jalankan nLite, kemudian klik Next, pada tampilan jendela yang baru kli Browse dan tentukan letak optical drive yang telah berisi CD Windows XP, kemudian tentukan folder pada PC atau laptop dimana nantinya kita akan menyimpan file instalasi Windows XP yang akan kita tambahkan driver SATA AHCI, kemudian klik Next.
  4. Karena kali ini kita hanya ingin mengintegrasikan driver SATA AHCI pada installer Windows XP, maka klik Next pada halaman yang tampil berikutnya. Setelah itu ada pilihan pengintegrasian, pilih Drivers, jika mau dapat juga mengintegrasikan service pack pada langkah ini.
    Dan     pilih Bootable ISO agar nantinya kita dapat boot melalui optical drive di laptop yang akan kita install Windows XP. Lanjutkan dengan klik Next jika sudah yakin pengintegrasian sudah benar.
  5. klik Insert, lalu pilih Multiple Driver Folder
    dan     kemudian pilihlah file SATA AHCI. Pilih driver yang sesuai dengan processor yang terdapat pada laptop yang ingin di-install. Untuk processor AMD pilih yang x86 klik Ok dan pilih OK lagi. Pilih Textmode driver dan kemudian pilih AMD SATA AHCI Controller-x86 platform dan klik OK. Lalu Next. Untuk processor Intel pada bagian Textmode driver pilih ICH9M-E/M SATA AHCI Controller, kemudian klik OK.
    Pengintegrasian driver SATA AHCI untuk processor Intel dan AMD tidak dapat digabung, jika dipakasa maka tetap tidak dapat meng-install Windows XP.
  6. Akan keluar konfirmasi apakah kita akan memulai proses pengintegrasian ato tidak, pilih saya Yes maka proses akan segera dimulai. Tunggu sampai proses selesai, kemudian klik Next.
  7. Proses selanjutnya adalah membuat file image yang nantinya akan kita jadikan CD. Setelah menentukan beberapa pengaturan klik pada tombol Make ISO dan tentukan lokasi dimana akan menyimpan image yang akan dibuat, klik Save maka proses pembuatan ISO akan berlangsung. Tunggu sampai proses selesai kemudian klik Finish.
  8. Saatnya burn ISO yang tadi dihasilkan menggunakan program favorite yang biasa digunakan, misalanya Nero Burning atau program lain. CD instalasi sudah dapat digunakan untuk menginstall Windows XP di Compaq CQ40 Series.
Tutorial ini telah dicoba dan dipraktekkan secara langsung dengan beberapa kali kegagalan karena coba-coba dan akhirnya menemukan penyebabnya. Perlu ditekankan bahwa untuk remastering, kita membutuhkan CD atau DVD Microsoft Windows original (asli) agar proses berjalan lancar.
Artikel ini didapat kari link
http://www.justyushi.web.id/2009/03/24/install-windows-xp-di-compaq-cq40-series/
Kadang kita sulit untuk mencari mana shoftware wine yang terbaru untuk ubuntu. Langkahnya tidak terlalu suklit, aslkan komputer Anda sudah tersambung ke Internet.
Langkah awal pilih Application , pilih Accessoris kemudian masuk ke terminal.

1. Ketik, echo "deb http://wine.budgetdedicated.com/apt jaunty main" |sudo tee -a /etc/apt/sources.list (kemudian enter).

2. Masukan Password anda (Tekan Enter)

3. Ketik, wget -q http://wine.budgetdedicated.com/apt/387EE263.gpg -O- | sudo apt-key add - (tanda mint di akhir harus ditulis tekan enter)

4. ketik, sudo aptitude update && sudo aptitude install wine (Tekan Enter).

Selamat Menggunakan Wine
Driver - AudioDateVersionPreviousSize
» IDT High Definition Audio CODEC
10-20096.10.6225.0 A-26.07M
Driver - ChipsetDateVersionPreviousSize
» Intel Chipset Installation Utility
10-20099.1.1.1015 A-2.23M
Driver - GraphicsDateVersionPreviousSize
» Mobile Intel 4 Series Express Chipset Family Graphics Driver (64-bit)
10-20098.15.10.1883 B-25.32M
» Nvidia GeForce G 105M/103M Graphics Driver
09-20098.15.11.8644 A-176.63M
Driver - Keyboard, Mouse and Input DevicesDateVersionPreviousSize
» ALPS Pointing Device Driver (2-Way) for 14-Inch Wide LCD
10-20097.202.1702.408 B-8.93M
» HP Quick Launch Buttons
08-20096.50.5.1» Version:23.46M
Driver - NetworkDateVersionPreviousSize
» Intel PRO/Wireless Drivers for Microsoft Windows 7
10-200913.0» Version:12.08M
» Realtek PCIe FE Family Controller
10-20097.3.522.2009 A-5.39M
» HP Wireless Assistant
09-20093.50.10.1» Version:4.02M
Driver - StorageDateVersionPreviousSize
» JMB38X Card Reader Host Controller Driver
10-20091.0.32.1 A-1.22M
BIOSDateVersionPreviousSize
» WinFlash for HP Notebook System BIOS - Microsoft Windows-Based
10-2009F.55 A-4.47M
Software - MultimediaDateVersionPreviousSize
» TV Tuner Driver
09-20091.0.0.4 A-6.74M
Software - SolutionsDateVersionPreviousSize
» Recovery Manager Installer Patch for Microsoft Windows 7 Upgrade
09-20091.0.5-376.53k
» Lightscribe System Software
08-20091.18.6.1 A» Version:9.42M
Utility - ToolsDateVersionPreviousSize
» HP Support Assistant
07-20094.1.11.3-18.35M

Synaptics Pointing Device Driver

Synaptics Pointing Device Driver for Windows 7 - 64bit


Klik disini untuk Download

Dijamin pasti bisa!!


Seperti kemajuan teknologi jaman sekarang yang dipenuhi kendaraan bermotor. Orang - Orang sering Berkata Harigini Ngoper gigi Cape deh, Sedangkan balasannya Untuk kendaraan yang tak punya gigi yaitu : Hari gini ga punya gigi Ompong deh (Nenek² kali!). Cerita diatas cma selingan ja tapi ada benernya jga Hari gini mesti nginstal dlu Pusing deh! mendingan Pasang ja Photoshop portable tinggal kopiin langsung dapat dipake. bagi yang ga mau Repot Nginstal silahkan Download Photoshop Portable dibawah ini:



  • Dwnload Photoshop CS3 Portable




  • Dwnload Photoshop CS3 Portable


    • Untuk Download Pertama di indowebster.
    Untuk Download Ke-Dua di rapidshare.