headline photo
Showing posts with label Logika dan Algoritma. Show all posts
Showing posts with label Logika dan Algoritma. Show all posts

Looping / Perulangan For .. To ... Do

Tuesday, 10 December 2019


Looping (perulangan) dipakai untuk mengerjakan pekerjaan yang sama, tetapi pekerjaan tersebut dilakukan dengan berulang-ulang.
Jenis-jenis looping:
1.      For .. To ... Do
2.      While ... Do
3.      Repeat ... Until

Dari jenis looping yang ada di atas, untuk lebih mudah memahaminya, perhatikan pekerjaan manusia seperti : foto copy dokumen, membuka kelapa muda, memasukkan air kedalam bak menggunakan gayung. Setelah memahami pekerjaan tersebut maka akan dapat lebih mudah kapan menggunakan for, while dan repeat.

A.   For .. To ... Do
Looping ini dipakai untuk mengerjakan pekerjaan yang berulang tetapi jelas diketahui jumlah perulangannya, dan type data untuk kondisinya bersifat numerik.
Bentuk umumnya ada 2, yaitu :
1.      For nilai_awal To Nilai_Akhir Do {menaik}
Pekerjaan
Contoh
For  i:=1 To 3 Do
      Write(i);
Hasilnya:
1
2
3

1.      For nilai_awal DownTo Nilai_Akhir Do
Pekerjaan
Contoh
For  i:=3 DownTo 1 Do
      Write(i);
Hasilnya:
3
2
1

Looping juga bukan sekedar melakukan pengerjaan mengurutkan angka, tetapi juga bisa mengerjakan yang lain seperti menuliskan beberapa kalimat, mengulang sebuah program dan lain sebagainya, contoh :

Silahkan download disini! dan disini

Soal UTS ( Penggunaan IF JAMAK)

Tuesday, 19 November 2019


 1.      Buatlah program untuk kasus di bawah ini
·      Jika kode barang = A01 maka nama barang =”Buku” dan harga =3000
·      Jika kode barang = A02 maka nama barang =”Pulpen” dan harga =3000
·      Jika kode barang = A03 maka nama barang =”Spidol” dan harga =5000
·      Jika kode barang = A04 maka nama barang =”Pensil” dan harga =1500
Input manual untuk jumlah barang,
Total di dapat dari jumlah barang x harga barang.


Tampilan Program :


Nama        : Denni M Rajagukguk
NIM         : 0110049201

Masukkan Kode barang A01,A02,A03,A04       : 
Nama Barang                                                       :
Harga                                                                   :
Jumlah Barang                                                     :
Total                                                                     : 



2.      Buatlah program untuk kasus di bawah ini
·      Jika golongan = 3A maka jabatan fungsional =”Asisten Ahli” dan gaji=2000000
·      Jika golongan = 3B maka jabatan fungsional =”Lektor” dan gaji=2500000
·      Jika golongan = 3C maka jabatan fungsional =”Lektor Kepala” dan gaji=3000000
Input manual untuk berapa bulan gajinya belum dibayar (tunggakan)
Total gaji di dapat dari tunggakan x gaji

Tampilan Program :
Nama                    : Denni M Rajagukguk
NIM                     : 0110049201
Program Studi      : D3 Komputerisasi Akuntansi /Manajemen Informatika

Masukkan Golongan 3A,3B,3C  : 
Nama Jabatan Fungsional            :
Gaji                                              :
Tunggakan (Bulan)                      :

Total  Gaji                                    : 

Untuk Listing Program silahkan download disini!

Membuat Biodata dengan Turbo Pascal

Tuesday, 5 November 2019

List Program:
program biodata;
uses crt;
var
      nama : string[25];
      kls : string[10];
      ttl, prodi, nm_prodi : string[30];
      npm : intEGER;
begin

clrscr;
WRITELN ('BIODATA PRIBADI');
write('NAMA : ');readln (nama);
write('NPM  : ');readln (npm);
write('TTL  : ');readln (ttl);
...............................
end.

Untuk Modul lengkapnya silahkan Downliad disini!


Program Pascal Menentukan Bilangan Genap dan Bilangan Ganjil

program bilangan_genap_ganjil;
 uses crt;
var
   hasil:byte;
   bil: integer;
begin
     clrscr;
     writeln('Menentukan Bilangan Genap dan Ganjil');
     writeln('created By : Denni M Rajagukguk');
     writeln('====================================');
     write('input bilangan: ');readln(bil);
     if bil <= 0 then
        begin
        writeln ('bilA sama dengan bilB');
        end
     else

Untuk Modul lengkapnya silahkan download disini

Program Pascal Menghitung Luas Segitiga dan Penjumlahan 2 Bilangan


 Mencari Luas Segitiga

List Programnya :
Program luas_segitiga;
Uses crt;
Var a, t : integer;
   L : real;
Begin
write(‘Masukkan nilai alas :’); readln(a);
write(‘Masukkan nilai tinggi :’); readln(t);
L :=0.5*A*T;
Write(‘Luas segitiga =’ );
Writeln(L);
Readln;
End.

Untuk modulnya, Silahkan download disini

Software Pemograman Menggunakan Turbo Pascal

Thursday, 18 October 2018

Di bawah ini adalah link untuk download softcopy Turbo Pascal

Silahkan download disini!

Setelah di download, langkah selanjutnya adalah extract folder tersebut.
Untuk menjalankannya pilih File TPX yang typenya Application seperti gambar dibawah ini

 Setelah kita Klik file tersebut maka akan muncul tampilan berikut 


 Setelah itu Tekan OK, dan Turbo Pascal siap digunakan.



Pert 2: Praktek Identifier, Type Data dan Operator

Listing Program


}program pertamaku;
}uses crt;
}var
}begin
}clrscr;
}write ('Hallo, Selamat datang !!! ');
}write ('Mari kita Belajar ');
}write ('TERIMAKASIH');
}end.
setelah siap diketikan listing programnya, langkah selanjutnya adalah menjalankan/eksekusi program dengan cara Ctrl+ F9 atau dari Menu Run Pilih Run.



Silahkan download disini!

Pert 1 : Praktek Pengenalan Bahasa Pemrograman Turbo Pascal

Pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971 dari Technical University di Zurich, Switzerland.
orientasinya pada segala tujuan.
termasuk kategori “High Level Language”.
Instruksi-instruksi yang digunakan sangat sistematis dan terstruktur.
Hasil pengembangannya :

  N UCSD Pascal.  ` Microsoft Pascal.N

  N Apple Pascal. N Turbo Pascal.

Silahkan download disini!

Contoh

Listing Program


program pertamaku;
uses crt;
var
begin
clrscr;
write ('Hallo, Selamat datang !!! ');
write ('Mari kita Belajar ');
write ('TERIMAKASIH');
end.



Maka hasilnya adalah :





Pert 6 : STRUKTUR KENDALI II (LOOPING)


Di dalam pemrograman terdapat beberapa bentuk perulangan. Setiap pemrograman  memiliki bentuk yang berbeda-beda. Yang akan dibahas disini yaitu pada perulangan pemrograman pascal yang menggunakan 
  •        For…Do
  •        While…Do dan 
  •       Repeat…Until 



 Digunakan untuk mengulang statement atau satu blok statement berulangkali sejumlah yang ditentukan tanpa suatu kondisi.
For..do terdiri atas dua jenis
1. For..Do… Positif
  Perulangan dimana nilai awal lebih kecil dibanding nilai akhir
2. For Do.. Negatif
  Perulangan dimana nilai awal lebih besar dibanding nilai akhir

Silahkan download disini!

Pert 4 : STRUKTUR KENDALI


Terdapat 3 proses eksekusi utama di dalam structure programming, yaitu :
1. Proses secara ‘Sequential’ (berurutan)
2. Proses secara ‘Selection/Decision’    (menggunakan statement kendali)
3. Proses secara ‘Repetition’


1. Proses secara ‘Sequential’ (berurutan)
Proses secara sequential terjadi bila proses berjalan dari atas ke bawah dan dikerjakan dari baris-perbaris. Proses sequential dapat digambarkan seperti dibawah ini. Proses A dikerjakan dahulu, setelah selesai dilanjutkan ke proses B.
Dengan kata lain proses dikerjakan urut kebawah 

Silahkan download disini!

Pert 3 : IDENTIFIER, TIPE DATA, OPERATOR

NAMA PENGENAL (IDENTIFIER)
dipakai sebagai pengidentifikasi ‘sesuatu’ dan program mengacu/memproses ‘sesuatu’ itu melalui namanya. Kata lain dari pengenal yaitu identifier yaitu suatu pengenal yang didefinisikan pemakai berguna untuk menampung data.

Silahkan download disini!

Pert 2: Pengenalan Flow Chart


Flowchart merupakan gambar atau bagan yang memperlihatkan urutan dan hubungan antar proses beserta instruksinya.
Gambaran ini dinyatakan dengan symbol.
◦setiap symbol menggambarkan proses tertentu.
◦antara proses digambarkan dengan garis penghubung.

Silahkan download disini!

Pengantar Algoritma

Wednesday, 26 September 2018

Algoritma diambil dari nama ilmuwan muslim Abu Ja’far Muhammad bin Musa Al-Khwarizmi (780-846 M) yang banyak menghasilkan karya dalam bidang matematika, disamping karya karyanya dalam bidang lainnya seperti geografi dan musik. Algorithma merupakan jantung ilmu komputer atau informatika tetapi algoritma tidak selalu identik dengan ilmu komputer saja Algoritma adalah urutan langkah langkah logis penyelesaian suatu masalah yang disusun secara sistematis. Logis artinya benar sesuai dengan logika manusia (akal pikiran). Untuk menjadi sebuah algoritma, urutan langkah-langkah yang ditempuh untuk menyelesaikan masalah harus memberikan hasil yang benar.

Materinya download disini

UTS 2018 "Penggunaan Fungsi IF dan CASE

Wednesday, 16 May 2018

program UTS2018;
Uses crt;
Var
Nm, Npm, kelas, kd_mk, nm_mk, ket : string;
na : byte;
nh : char;

Begin
Textcolor (RED);
Clrscr;
Writeln("*** UTS STMIK  KRISTEN NEUMAN INDONESIA***");
Write("NPM ="); readln(npm);
Write("NAMA="); readln(nm);
Write("KELAS="); readln(kelas);

write("input kode matakuliah :"); readln(kd_mk);
     if kd_mk ="AP"   then nm_mk:="Algoritma Pemograman"
else if kd_mk ="BIG"  then nm_mk:="Bahasa Inggris"
else if kd_mk ="BIND" then nm_mk:="Bahasa Indonesia"
else if kd_mk ="MM"   then nm_mk:="Matematika";
writeln("Nama Matakuliah =",nm_mk);
TEXTCOLOR (YELLOW);
Write("input nilai angka ="); readln(na);
Case na of
81..100 : nh:="A";
71..80  : nh:="B";
61..70  : nh:="C";
51..60  : nh:="D";
0..50   : nh:="E";
End;
Writeln("Nilai huruf  =",nh);
if nh="A" THEN KET :="MENDAPAT BEASISWA";
 Writeln("keterangan =",ket);
 WRITELN("");
 WRITELN("");
 WRITELN("Denni M Rajagukguk");READLN;
End.

NB: Harap diperhatikan baik baik codingnya, banyak jebakannya. Seamat mencoba  (')


Pert 5 : STRUKTUR KENDALI (NESTED IF/ IF BERSARANG) DAN CASE

Wednesday, 2 May 2018

CASE  digunakan untuk memilih diantara banyak pilihan.

Kelebihan dan kekurangan case

Kita tidak perlu membuat kondisi seperti halnya dengan statement IF.
Perbedaan case dengan IF adalah pernyataan if menyeleksi suatu kondisi yang terpenuhi, setelah memproses pernyataan dalam lingkungan yang terpenuhi tersebut.  Sedangkan case bila salah satu nilai terpenuhi dan pernyataan tersebut telah diproses maka yang lain tidak akan diseleksi.
Case terbagi atas 2:
◦CASE OF
◦CASE OF ELSE


Untuk materinya silahka download disini

 Atau kunjungi alamat ini.. https://www.duniailkom.com

Proteksi DMCA