muhammadlathifazmii

   What's up guys balik lagi ke blog gue yang selalu ingin bantu mengerjakan tugas sist/gan yang belom kelar nihh.... langsung aja cekibroooott....!!!!!   PASCAL IDE. Progam Procedure_Pembelian; USES CRT; VAR KB, NB : ARRAY[1..10] OF STRING;     HG, JML : ARRAY[1..10] OF LONGINT;     ADL: CHAR;     JD, X, BR : BYTE;     TOTAL, DISC, PB : REAL; BEGIN      ADL:='Y';JD:=0;      WHILE (ADL='Y') AND (JD<=10) DO      BEGIN           CLRSCR;           GOTOXY(25,5);WRITE('ENTRY DATA PEMBELIAN');           GOTOXY(25,6);WRITE('====================');           JD:=JD+1;           GOTOXY(25, 8);WRITE('KOD...

  Hai sist/gan kembali lagi di blog gue, Disini gue mau bantu buat yang kesulitan mencari codingan Menara Hanoi langsung aja cekibrooooottt.....!!!!  PASCAL IDE. Program Menara_Hanoi; Uses Crt; Procedure MenaraHanoi (Jumlah : Integer;  Sumber, Tujuan, Bantuan : Char;  Var Langkah, Jumlah_A, Jumlah_B, Jumlah_C, Waktu : Integer); Var Baris_Sumber, Kolom_Sumber, Baris_Tujuan, Kolom_Tujuan : Integer; Begin If Jumlah > 0 Then Begin MenaraHanoi(Jumlah-1,Sumber,Bantuan,Tujuan,Langkah,Jumlah_A,Jumlah_B,Jumlah_C,Waktu); Langkah := Langkah+1;         If Sumber = 'A' Then         Begin              Kolom_Sumber := 30;              Baris_Sumber := 24 - Jumlah_A;              Jumlah_A   ...

Nama : Muhammad Lathif Azmii            NPM :06201740013 Program Studi :Sistem Informasi  Matakuliah :Algoritma PASCAL IDE Halo sist/gan Disini gue mau bantu buat yang kesulitan mencari codingan Deret Fibonacci langsung aja cekibrooooottt.....!!!!  Program deret_fibonacci; uses crt; var a,b,c,d,f:integer; begin clrscr; writeln(‘Program Deret Fibonacci’); writeln; write(‘Masukkan Jumlah Deret’); readln(a); write(‘Deret Fibonacci const:’); d:=0; f:=1; c:=0; for b :=1 to a do begin c:=d+c; d:=f; f:=c; write(c); write(‘ ‘); end; readln; end. Output Program Deret Fibonacci Masukkan Jumlah Deret:5 Deret Fibonacci const:0 1 1 2 3 Oke sekedar memberi jawaban buat mempermudah  tugas kuliah  kalian yang belom kelar wkwkw jangan lupa kunjungi terus blog gue, sekian dan terimakasih 

Nama : Muhammad Lathif Azmii            NPM :06201740013 Program Studi :Sistem Informasi  Matakuliah :Algoritma 1. {luas dan keliling Lingkaran} Program Lingkaran; Uses crt; Const pi =3.14; Var  r:integer;      L,k:real; begin clrscr; writeln(‘Hitung Luas dan Keliling Lingkaran’); writeln(‘==================================’); writeln(‘jari - jari :’); readln(r); L:pi*r*r; K:2*3.14*r; writeln(‘luas:’,l:0:2); writeln(‘keliling:’,K:0:2); readln ; end. Attention! Selalu Perhatikan tanda baca atau huruf  saat anda mengerjakannya dengan pascal, karena itu dapat berpengaruh saat anda mencobanya di pascal, jika tidak sesuai akan terjadi sintax error. ==semoga dapat membantu anda mengerjakan tugas==

Nama : Muhammad Lathif Azmii            NPM :06201740013 Program Studi :Sistem Informasi  Matakuliah :Algoritma Program pascal Menggunakan Tipe Data Array Program tipearray; Uses crt; var nilai: array[0..1,0..1] of integer; begin clrscr; nilai[0,0]:=1; nilai[0,1]:=2; nilai[1,0]:=4; nilai[1,1]:=5; write(nilai[0,0]); writeln(nilai[0,1]); write(nilai[1,0]); writeln(nilai[1,1]); readln; end. Output 12 45 Attention! Selalu Perhatikan tanda baca atau huruf  saat anda mengerjakannya dengan pascal, karena itu dapat berpengaruh saat anda mencobanya di pascal, jika tidak sesuai akan terjadi sintax error. ==semoga dapat membantu anda mengerjakan tugas==

PERANCANGAN SISTEM PEMBELAJARAN JARAK JAUH BERBASIS WEB PROGRAM STUDI SISTEM INFORMASI FAKULTAS ILMU KOMPUTER SKRIPSI Diajukan Kepada Institut Bisnis dan Informatika Kosgoro 1957, Program Studi Sistem Informasi sebagai Bagian dari Pernyataan untuk Memperoleh Gelar Sarjana Komputer (S-1) Muhammad Lathif Azmii NIM : 06201740013 INSTITUT BISNIS DAN INFORMATIKA KOSGORO 1957 FAKULTAS ILMU KOMPUTER PROGRAM STUDI SISTEM INFORMASI JAKARTA 2017 _____________________________________________________________________ LEMBAR PERSETUJUAN PROPOSAL SKRIPSI Nama Mahasiswa        : Muhammad Lathif Azmii NIM                             : 06201740013 Program                   ...