meimikirfaedah

PROGRAM PASCAL TOTAL NILAI AKHIR MENGGUNAKAN IF Berikut ini salah satu contoh program pascal total nilai akhir menggunakan if 1.Programnya Program TotalNilai; uses crt; var    NH,NT,NUTS,NUAS,NA   : real; begin      clrscr;      Writeln('Program Total Nilai Mahasiswa');      Write('Input Nilai Hadir =');readln(NH);      Write('Input Nilai Tugas =');readln(NT);      Write('Input Nilai UTS   =');readln(NUTS);      Write('Input Nilai UAS   =');readln(NUAS);      NA:=0.1*NH+0.2*NT+0.3*NUTS+0.4*NUAS;      Writeln('Total Nilai Akhir=',NA:2:0);      readln; end. 2.Program pascal 3.Hasilnya

PROGRAM PASCAL  KEPEMILIKAN MOBIL MENGGUNAKAN IF Berikut ini program pascal kepemilikan mobil menggunakan if 1.Programnya Program KreditPemilikanMobil; uses crt; var    Ptetap,Ptambahan,Pkeluarga,JumlahP   :real; begin      clrscr;      Writeln('Program Kredit Pemilikan Mobil');      Write('Input Gaji Pokok      :');readln(Ptetap);      Write('Input Gaji Tambahan   :');readln(Ptambahan);      Write('Input Gaji Keluarga   :');readln(Pkeluarga);      Ptambahan:=Ptambahan/2;      Pkeluarga:=Pkeluarga/3;      JumlahP:=Ptetap+Ptambahan+Pkeluarga;      Writeln('Jumlah Pendapatan          Rp:',JumlahP:0:0);      If JumlahP>=1000000 then         Writeln('Mendapat Kredit Sedan')      else if (JumlahP...

PROGRAM PASCAL PERKALIAN MENGGUNAKAN PERULANGAN FOR NEXT Berikut ini contoh program dari perkalian menggunakan perulangan fornext 1.Programnya program fornext; uses crt; var    i    : integer; begin      clrscr;      for i:=1 to 20 do      begin           Writeln(i,'x3 =',i*3);           end;           readln;      end. 2.Program pascal 3.Hasilnya

PENERAPAN ALGORITMA DALAM KEHIDUPAN SEHARI-HARI CONTOHNYA PENGEMUDI DRIVER Berikut ini contoh penerapan algoritma dalam kehidupan sehari-hari 1. Driver masuk ke akun miliknya 2. Kemudian tunggu notifikasi yang menunjukkan bahwa ada customer di dekatnya yang ingin     menggunakan jasanya 3.Klik terima orderan, dan pastikan bahwa customernya memang penjemputnya atau opsi lain anda    bisa klik cancel 4.Jemput customer ditempat yang sudah disepakati 5. Kemudian pick customer sampai ke lokasi tujuan atau memulai start trip 6. Sesudah tiba dilokasi driver bisa mengklik end trip atau memastikan bahwa customer sudah sampai      tujuan,agar pembayaran dapat diterima.

ALGORITMA DALAM BAHASA DESKRIPTIF DAN PSEUDO-CODE Berikut algoritma dalam bahasa dekriptif dan pseudo-code 1.Kalimat Deskriptif         adalah cara menuliskan instruksi-instruksi yang harus dilaksanakan dalam bentuk untaian kalimat deskriptif dengan menggunakan bahasa yang jelas.Sedangkan dalam pengaplikasian transportasi bebasis online tentunya menggunakan bahasa pemograman deskriptif seperti didalam kegiatan taransportasi online sendiri . 2.Peudo-code       adalah kode atau tanda yang menyerupai penjelasan cara menyelesaikan persoalan.Dan kode atau tanda tersebut ditulis dalam bahasa yang di mengerti oleh manusia itulah definisi dari kalimat deskriptif dan pseudo-code.

PROGRAM MEMBUAT LAPORAN GAJI KARYAWAN DENGAN WHILE END WHILE Berikut ini contoh program membuat laporan gaji karyawan dengan while end while Programnya program LaporanGajiKaryawan ; uses crt; var    nk,kb,pt,jb           : String;    tj,gp,tf              : Longint;    bn,ta,tg              : real;    ja,lk                 : byte;    tanya                 : char; begin      tanya:='y';      while upcase(tanya)='Y' do      begin           clrscr;           writeln('Program Laporan Gaji Karyawan');           write('Input Nama        :');readln(nk);           write('input jabatan ...

PROGRAM MENGHITUNG GAJI PEGAWAI MENGGUNAKAN WHILE END WHILE Berikut ini menghitung gaji pegawai menggunakan while end while Programnya program gajikaryawan ; uses crt; var    nama,golongan                : String;    gaji,uanglembur              : Longint;    upahlembur, totalgaji        : Longint;    jam                          : Integer;    lagi                         : char; begin      lagi:='y';      while Upcase(lagi)='Y' do      begin           clrscr;           writeln('Program Gaji Karyawan');           write('Input Nama        :');readln(nama);     ...

PROGRAM CEK KELULUSAN MENGGGUNAKAN REPEAT DAN UNTIL Berikut ini program cek kelulusan menggunakan repeat dan until Programnya program Cek_Kelulusan; uses crt; var    N         :Byte;    ket       :String;    lg        :char; begin      lg :='Y';      repeat      begin           clrscr;           writeln('Program Cek Kelulusan');           write('Input Nilai Anda : ');readln(N);           if N >=60 then                ket:='lulus'           else                ket:='gagal';           writeln('Anda             :',ket);           Writeln('...

PROGRAM MENGHITUNG HARGA PEMBAYARAN DAN DISCOUNT  Berikut bentuk program menghitung harga pembayaran dan discount Programnya Program MenghitungHargaPembayaran; uses crt; var    TP,P,HP,Discount :real;    lg               :char; begin      lg :='Y';      While Upcase(lg)='Y'do      begin      clrscr;      Writeln('Program Menghitung Harga Pembayaran');      Write('Input Total Pembelian   Rp: ');readln(TP);      Discount :=0.1;      if TP >1500000 then         P :=TP * Discount      else           P:=0;      HP :=TP-P;      Writeln('Mendapat Harga Potongan Rp:  ',P:0:0);      Writeln('____________________________________ -');      Writeln('Har...

HARDWARE Berikut ini definisi hardware dan macam-macam perangkat keras 1.Pengertian Hardware         Hardware ( Perangkat Keras) merupakan suatu komponen yang ada pada komputer, bisa dilihat secara kasat mata dan mampu di sentuh secara fisik. Sementara itu,contoh dari hardware itu sendiri yakni : a. Perangkat Input (Masukan) : Perangkat keras yang digunakan untuk memasukkan (input)dari     pengguna yang akan diproses oleh komputer.Contohnya seperti : mouse, keyboard, jiystick,      touchpad, light pen, barcode, scanner, microphone, dan lain-lain. b . Perangkat Proses : Perangkat keras yang berguna untuk memproses masukan yang telah diberikan     oleh pengguna.Contohnya  Processor. c. Perangkat Output( Keluaran) : Perangkat keras yang digunakan untuk meanmpilkan hasil yang      telah diolah oleh komputer dan selanjutnya diberikan kepada pengguna, Contohnya seperti :     Speaker, monitor, ...

CONTOH PENERAPAN ALGORITMA MENGIRIM SURAT KE KANTOR POS Berikut contoh penerapan algoritma mengirim surat ke kantor pos a .  Mulai b. Siapkan kertas  c. Siapkan Amplop  d. Siapkan alat tulis e. Mulai menulis f. Masukkan kertas ke dalam amplop g. Lem amplop h. Tulis alamat tujuan di belakang amplop i. Tempelkan ke perangko j. Pergi ke kantor pos k. Poskan surat tsb l. selesai

CONTOH PENERAPAN ALGORITMA PENERIMAAN MAHASISWA BARU STMIK BUDI DARMA  Berikut adalah salah satu contoh penerapan algoritma menerima mahasiswa stmik budi darma: a. Calon Mahasiswa datang ke bagian Pendaftaran (Admin) b. Membeli dan mengisi formulir c. Membayar uang kuliah semester awal ( sesuaikan dengan kampus) d .Mengumpulkan dan menyerahkan persyaratan untuk pendaftaran e. Jika persyaratan sudah lengkap, dan jika tidak maka akan kembali lagi ke proses     mengumpulkan persyaratan f. Menerima almemater, jadwal orientasi dan mata pelajaran kuliah tsb g. Mengikuti orientasi  h. Setelah itu kuliah 

MEMPREDIKSI TANGGAL PERKIRAAN LAHIR BAYI DENGAN KALIMAT DESKRIPSI DAN PSEUDO-CODE Nah berikut ini contoh kalimat deskripsi dan pseudo-code memprediksi tanggal perkiraan lahir bayi a.Kalimat Deskripsi        Mulai        Input tanggal, bulan, tahun (HPHT)        Bulan HPTP di kurang 3        Tahun HPTP di tambah 1        Tampilan  Perkiraan lahir bayi        Selesai b.Pseudo-code      Algoritma    : Perkiraan-( lahir-bayi)      Deklarasi  ;           tgl HPHT           bulan HPHT           tahun HPHT           perkiraan kelahiran       Deskripsi ;       Read tgl HPHT       Read bulan HPHT       Read tahun HPHT       Perkiraan ...

MENGURUTKAN 3 BILANGAN YANG DIINPUTKAN DENGAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE Berikut ini kalimat deskriptif  dan pseudo-code mengurutkan 3 bilangan yang diinputkan  a.Kalimat Deskriptif     Mulai     Input a     Input b     Input c     Jika a>b>c   = a,b,c            a>c>b    = a,c,b            b>a>c    = b,a,c            b>c>a    = b,c,a            c>a>b    = c,a,b            c>b,a     = c,b,a     Tampilan urutan bilangan     Selesai b.Pseudo-code      Algoritma  : Menampilkan-urutan-Bilangan      Deklarasi ;          a,b,c   : Numeric;   ...

MENGHITUNG LUAS PERSEGI PANJANG MENGGUNAKAN PROGRAM PASCAL Berikut ini contoh program mencari luas persegi panjang 1.Programnya program luaspersegipanjang; uses crt; var    Panjang     : Integer;    Lebar       : Integer;    Luas        : Integer; begin      clrscr;      writeln('program mencari luas persegi panjang');      write('Input Nilai Panjang =');readln(Panjang);      write('Input Nilai Lebar =');readln(Lebar);      Luas :=Panjang*Lebar;      writeln('Nilai Luas =',Luas);      readln; end. 2.Program pascal 3.Hasilnya

BAGAN ALIR ( FLOWCHART) 1.Definisi Bagan Alir (Flowchart)          Flowchart atau bagan alir adalah suatu skema/gambar yang memperlihatkan urutan intruksi/kegiatan dan hubungan antar proses beserta instruksinya. Gambaran ini dinyatakan dengan symbol. Dengan demikian setiap symbol menggambarkan proses tertentu. Sedangkan antara proses digambarkan dengan garis penghubungan.        Penulisan dengan menggunakan bagan alir sudah tidak banyak digunakan, dengan alasan hanya cocok untuk masalah kecil, memerlukan kemampuan menggambarkan yang baik. Namun flowchart sangat bermanfaat jika digunakan untuk menggambarkan logika pemecahan masalah untuk pengajaran.            Pada dasarnya terdapat berbagai jenis flowchart,yaitu: 1.Flowchart Sistem ( System Flowchart) 2.Flowchart Paperwork(Flowchart Dokumen( Document Flowchart), 3.Flowchart Skematik( Schematic Flowchart), 4.Flowchart Program( Program Flowchart), 5.Fl...

TIPE-TIPE DATA DASAR PADA PROGRAMMING Tipe data akan sangat membantu kita dalam membedakan isi dari suatu variabel( yang kita buat,tipe data perlu di inisialisasi sebelumnya baik secara privat maupun publik. Berikut ini adalah tipe-tipe data yang dasar pada programming yang sering digunakan. 1.Integer       Merupakan tipe data yang berisi bilangan bulat sebanyak 32 bit. 2.Short        Merupakan tipe data yang berisi bilangan bulat sebanyak 16 bit. 3.Long          Merupakan tipe data yang berisi bilangan bulat sebanyak 64 bit. 4.Char       Merupakan tipe data yang berisi karakter tunggal/satu huruf yang berisi 16 bit biasay diapit dengan tanda satu petik. 5.String       Merupakan tipe data yang berisi sekumpulan karakter yang panjang dalam penggunaannya biasanya diapit dengan dua tanda petik. 6.Float     Merupakan tipe data untuk menyimpan bilangan desimal yang berisi 3...

PROGRAM PASCAL MENGGUNAKAN PERULANGAN FOR NEXT Berikut ini program pascal menggunakan perulangan for next 1.Programnya program fornex; uses crt; var    i    : integer; begin      clrscr;      for i := 1 to 15 do      begin      writeln(i,'._Mailani Safitri');      end;      readln; end. 2.Program pascal 3.Hasilnya

PROGRAM PASCAL MENAMPILKAN BERAT IDEAL Berikut ini program pascal untuk menampilkan berat ideal dari tinggi badan yang diinputkan 1.Programnya program MenampilkanBeratIdeal; uses crt; var    TB,BI  : real ; begin      clrscr;      writeln('Program Menampilkan Berat Ideal');      write('Input Tinggi Badan :');readln(TB);      BI :=(TB-100)*0.9;      Writeln('Berat Ideal(KG)   :',BI:0:0);      readln; end. 2.Program dalam Pascal 3.Hasilnya

PROGRAM PASCAL MENGHITUNG KOMISI SALESMEN MENGGUNAKAN IF Berikut ini program pascal menghitung komisi salesmen menggunakan if 1.Programnya program MenghitungKomisiSalesmen; uses crt; var    JumlahPenjualan,Komisi: real; begin      clrscr;      writeln('program MenghitungKomisiSalesmen');      write('Input Jumlah Penjualan    :');readln(JumlahPenjualan);      Komisi :=0.1*500000;      if JumlahPenjualan >500000 then         Komisi :=Komisi+((JumlahPenjualan-500000)*0.15);      writeln('Komisi       :',Komisi:0:0);      readln; end. 2.Program dalam pascal 3.Hasilnya

PROGRAM MENGHITUNG GAJI HARIAN PEGAWAI MENGGUNAKAN IF Berikut ini adalah program menhitung gaji harian pegawai menggunakan if 1.Programnya program MenghitungGajiHarianPegawai; uses crt; var    JJK,Gaji_Harian,Gaji : real; begin      clrscr;      writeln('Program Menghitung Gaji Harian Pegawai');      write('Input Jumlah Jam Kerja :');readln(JJK);      Gaji:=500;      if JJK>7 then         Gaji_Harian :=Gaji*7+(Gaji*1.5*(JJK-7))      else          Gaji_Harian :=Gaji*JJK;          writeln('Gaji Harian               Rp.:',Gaji_Harian:0:0);          readln;      end. 2.Program dalam pascal 3.Hasilnya

PROGRAM PASCAL MENCARI RATA RATA PENJUALAN Berikut ini adalah program pascal untuk mencari rata rata penjualan 1.Programnya program RataRataPenjualan; uses crt; var    ph1,ph2,ph3,ph4,ph5,rrp : real; begin      clrscr;      writeln('program mencari Rata_rata Penjualan');      write('Input Penjualan Hari 1 =');readln (ph1);      write('Input Penjualan Hari 2 =');readln (ph2);      write('Input Penjualan Hari 3 =');readln (ph3);      write('Input Penjualan Hari 4 =');readln (ph4);      write('Input Penjualan Hari 5 =');readln (ph5);      rrp :=(ph1+ph2+ph3+ph4+ph5)/5;      writeln('Rata rata Penjualan  =',rrp:0:0);      readln; end. 2.Program Pascal 3.Hasilnya

PROGRAM PASCAL MENENTUKAN BILANGAN GENAP DAN GANJIL MENGGUNAKAN IF SERTA PERULANGAN FOR NEXT Berikut ini adalah contoh program pascal menentukan bilangan genap dan ganjil menggunakan if serta perulangan for next 1.Programnya program ganjilgenap; uses crt; var    N,i : integer; begin      clrscr;      writeln('program ganjil genap');      for N :=1 to 10 do      begin           write(N,'.Input Bil = ');readln(i);           if i mod 2 = 0 then              writeln(' Keterangan = Genap')           else               writeln(' Keterangan = Ganjil')      end;      readln; end. 2.Program dalam Pascal 3.Hasilnya

PROGRAM PASCAL MENAMPILKAN BILANGAN GANJIL DARI 1 SAMPAI N DERET  MENGGUNAKAN IF SERTA PERULANGAN FOR NEXT Berikut ini adalah contoh program pascal menampilkan bilangan ganjil dari 1 sampai n deret menggunakan if seta perulangan for next 1. Programnya program ganjil; uses crt; var    i,n : integer; begin      clrscr;      write('batas=');readln(n);      for i :=1 to n*2 do      begin           if i mod 2=1 then           write(i,',');      end;      readln; end. 2. Program dalam pascal 3.Hasil Program

PROGRAM PASCAL MENAMPILKAN HASIL PERKALIAN YANG DIINPUTKAN MENGGUNAKAN PERULANGAN FORNEXT Berikut ini adalah contoh program pascal hasil perkalian yang diinputkan menggunakan perulangan for-next 1 .Programnya program fornext; uses crt; var    i : integer;    y : integer; begin      clrscr ;      write('input Nilai y =');readln(y);      for i :=1 to 10 do      begin           writeln(i,'x',y,'=',i*y);      end;      readln; end. 2 .Program dalam pascal 3.Hasil program

KALIMAT  DESKRIPTIF DAN PSEUDO-CODE  MENGHITUNG  KONVERSI(CELCIUS KE FAHRENHIT,REAMUR) Berikut ini kalimat deskriptif dan pseudo code menghitung konversi (celcius ke fahrenhit, reamur) Kalimat Deskriptif                 Mulai                 Input n celcius                  Input n fahrenhit                 Input n reamur                   Hitung                 n fahrenhit = n celcius *1.8 +32                 n reamur    = n celcius *0,8                 Tampilan n fahrenhit                 Tampilan n reamur                 Selesai ...

PSEUDO-CODE PEMBAYARAN TAGIHAN UNTUK PELANGGAN PT PLN Berikut ini adalah pesudo-code pembayaran tagihan untuk prlanggan PT PLN *Pseudo-Code           start           variabel               Nama Pelanggan,kode,,jenis,pelanggan        : String               Jumlah Pemakaian                                         : Integer               Biaya Beban,Harga PerM3,tot Harga            : Logint               Pajak,Font Tagihan                                        : Real          Input          ...

KALIMAT DESKRIPTIF DAN PSEUDO-CODE MENAMPILAKAN BERAT IDEAL Nah berikut adalah kalimat deskriptif dan pseudo code menampilkan berat ideal Kalimat Deskriptif                Mulai                Input tinggi badan                Input berat badan                Hitung tinggi badan dikurang 100 dikali 0                Tampilkan berat ideal                Selesai Pseudo-Code               Algoritma  : Menampilkan -Berat-Ideal               Deklarasi  :                        TB    :Integer   ;                        ...

KALIMAT DESKRIPTIF DAN PSEUDO-CODE MENCARI LUAS PERSEGI PANJANG Berikut adalah Kalimat Deskriptif dan Pseudo code mencari luas Persegi Panjang Kalimat Deskriptif                Mulai                Masukkan nilai Lebar                Hitung nilai Luas = Panjang*Lebar                Tampilankan nilai Luas                Selesai Pseudo-code                Start                Variabel                           Panjang    : Integer                           Lebar        : Integer             ...

MENCARI LUAS LAYANG LAYANG DENGAN MENGGUNAKAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE Berikut Kalimat Deskriptif dan Pseudo-code mencari Luas Layang- layang Kalimat Deskriptif               Mulai               Masukkan nilai d1               Masukkan nilai Luas =1/2*d1*d2               Tampilan nilai Luas               Selesai Pseudo-code              Start              Variabel                          d1        : Integer                          d2        : Integer                          Luas...

MENCARI LUAS JAJAR GENJANG DENGAN MENGGUNAKAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE Kalimat Deskriptif                Mulai                 Masukkan nilai Alas                Masukkan nilai Luas = Alas*Tinggi                Hitung nilai Luas = Alas*Tinggi                Tampilkan nilai Luas                 Selesai Pseudo-code             Start             Variabel                       Alas    : Integer                       Tinggi  : Integer                       Luas  ...

MENCARI LUAS LINGKARAN MENGGUNAKAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE Kalimat Deskriptif dan Pseudo-Code Mencari Luas Lingkaran Kalimat Deskriptif              Mulai              Masukkan nilai r              Hitung nilai luas = 3.14*r^2              Tampilkan nilai Luas              Selesai Pseudo-code             Start             Variabel                      r       : Integer                      Luas  : Integer             Input                     Read (r)             Pros...