Welcome To My Site

Terima kasih anda masih setia mengunjungi blog kami ,

Just Sharing Bro N Sis

Menerima Penginstalan PC / Laptop Untuk Daerah Makassar ,, Harga Murah Dan Terjangkau Khususnya Bagi Pelajar Dan Mahasiswa Daerah Makassar Dan Sekitarnya Alamat : Jl.AbubakarLambogo No 178 Pettarani Makassar Jl.Aspol Toddopuli Blok C20 Contact person : +628524138771 (Fh14n)

Tips Dan Trik Komputer

Komputer Sangat Banyak Yang bisa Kita pelajari dan banyak hal didalam komputer yang belum ketahui, Ayo ketahui Sekarang !.

Belajar Internet

Internet Begitu luas, ayo pelajari sekarang jangan sampai kita GaptekK ,, hahaha

Ngasal Aja Bro tapi Pas Kena Di Hati ,, hahaha

Jika cinta itu Sistem Operasi, maka, tak akan kubiarkan cinta ini terkena virus yang bisa mengganggu stabilitas dan eksistensinya sebagai sistem operasi yang tangguh. kalau perlu akan kugunakan sistem operasi yang kebal virus.

Tuesday, December 30, 2014

Algoritma & Pemrograman 1 ( TUGAS LENGKAP )


Assalamualaikum Wr.Wb ,,,,,,,
Kali ini saya akan menjelaskan tentang Apa itu Algoritma dan Pemrograman .....
          Algoritma adalah langkah-langkah yang disusun secara tertulis dan berurutan untuk menyelesaikan suatu masalah.  Sedangkan Algoritma Pemrograman adalah langkah-langkah yang ditulis secara berurutan untuk menyelesaikan masalah pemrograman komputer. 

Langsung aja tanpa basa-basih , :) ,,,,heeheh
nih contoh sript

uses crt;
var
   awal,akhir,rpbunga   : real;
   bunga, lama, i       : integer;
   mau                  : char;
begin
     repeat
       clrscr;
       writeln('*******************************');
       writeln('**    Nama  : ALFIAN    **');
       writeln('**    Kelas : TI.12          **');
       writeln('**    NIM   : 20142205090    **');
       writeln('*******************************');
       writeln;
       writeln;
       write('Pinjaman Awal = Rp. ');readln(awal);
       write('Bunga [%] = ');readln(bunga);
       write('Lamanya Pinjaman [Periode] = ');readln(lama);
       writeln('------------------------------------------------');
       writeln(' Periode Bunga [%] Pinjaman Pinjaman Bunga [Rp] ');
       writeln('                    Awal      Akhir');
       writeln('------------------------------------------------');
       for i:=1  to lama do
       begin
            akhir:=awal + ((bunga/100) * awal);
            rpbunga:=0.1 * awal;
            writeln(i:5, bunga:9, awal:11:0, akhir:11:0, rpbunga:10:0);
            awal:=akhir;
       end;
       writeln('Mau Menghitung Lagi ? [Y/N] : ');readln(mau);
       until mau='0';
readln;
end.


Untuk lebih jelasnya DOwnload Script & contohnya .