Postingan

Menampilkan postingan dari Agustus, 2016

Turbo pascal hitung nilai mahasiswa

Gambar
Program Hitung Nilai Mahasiswa dengan Turbo Pascal program data_mahasiswa; uses crt; type mahasiswa=record nim:string; nama:string; presnsi,uas,uts,tugas:integer; nilai:real; grade:char; end; var mhs:array [1..10] of mahasiswa; i,j,x:integer; jml:integer; kode_mk:integer; nama_mk:string; begin clrscr; j:=0; writeln(‘=====================================’); writeln(‘       PROGRAM HITUNG NILAI          ‘); writeln(‘=====================================’); write(‘Masukan Jumlah Data     : ‘);readln(jml); write(‘Masukan Kode Matakuliah : ‘);readln(kode_mk); writeln; if kode_mk =151 then begin nama_mk:=’Algoritma & Pemograman’; end else if kode_mk=422 then begin nama_mk:=’Linux 1′; end else if kode_mk=733 then begin nama_mk:=’PPN II (Access)’; end else if kode_mk=772 then begin nama_mk:=’DBMS’; end else begin nama_mk:=”; end; if jml>10 then begin writeln(‘Melebihi Kapasitas’); end else begin for i:=1 to jml do begin with mhs[i] do begin write(‘Nilai ke- ‘,i,’ dari ‘,jml);

Hitung nilai mahasiswa pascal

Gambar
Hitung nilai kehadiran mahasiswa pascal program hitung_nilai; var Np:string[6]; Nama:string[30]; NK1,NK2,NK3,NK4,NK5,NK6,NK7,NK8,NK9,NK10,NK11,NK12,NK13,NK14,NK15,TH,NT1,NT2,NT3,NT4,NT5,TT,NM,NF:integer; TNK,TNT,NA:Real; NH:char; begin writeln('menghitung nilai akhir'); write('masukan no pokok:'); readln(NP); write('masukan nama:'); readln(Nama); write('masukan nilai kehadiran ke 1='); read(NK1); write('masukan nilai kahadiran ke 2='); read(NK2); write('masukan nilai kehadiran ke 3='); read(NK3); write('masukan nilai kehadiran ke 4='); read(NK4); write('masukan nilai kehadiran ke 5='); read(NK5); write('masukan nilai kehadiran ke 6='); read(NK6); write('masukan nilai kehadiran ke 7='); read(NK7); write('masukan nilai kehadiran ke 8='); read(NK8); write('masukan nilai kehadiran ke 9='); read(NK9); write('masukan nilai kehadiran ke 10=');read(NK10); wr

Cara Memperbaiki Flash Disk Rusak

Gambar
                   Cara memperbaiki FB rusak Flashdisk adalah alat penyimpanan data memori flash tipe NAND yang memiliki alat penghubung USB yang terintegrasi. Fungsi dari Flashdisk adalah sebagai media penyimpanan data. Bentuknya yang kecil, ringan, simple, dan memiliki kapasitas yang besar membuat banyak user memilih Hardware ini sebagai media penyimpanan data yang efektif dan efisien karena dapat dibawa kemana-mana. Namun kendalanya adalah kadang Flashdisk kita tidak dapat terbaca sama sekali oleh suatu komputer ataupun laptop, hal tersebut bisa disebabkan oleh kerusakan Hardware ataupun perangkat lainnya yang disebabkan oleh kita sendiri. Oleh karena itu, ada beberapa cara untuk memperbaiki Flashdisk yang rusak sebelum membeli yang baru apabila Flashdisk sudah benar-benar tidak dapat digunakan lagi. Flashdisk Pertama adalah lakukan cara paling mudah dengan cara test kesehatan Flashdisk pada komputer/ laptop lain untuk memastikan Flashdisk benar-benar tidak bisa terbaca a

Komponen Utama Komputer

Gambar
Komponen Utama Komputer Komponen-komponen komputer  yang melekat dalam komputer personal merupakan benda penting yang bisa dikatakan sebagai nyawa dari komputer kita. Tanpa adanya salah satu dari komponen-komponen komputer berikut ini, komputer tidak akan dapat beroperasi dengan baik, malah kadang tidak dapat berfungsi sama sekali. Agar dapat menjaga komputer anda dalam kondisi baik, ada baiknya kita mengenal lebih akrab  komponen-komponen komputer  beserta fungsinya. Komponen Utama dalam Komputer Komponen pertama yang perlu kita kenal adalah motherboard. Motherboard merupakan komponen perangkat keras atau  hardware  paling penting dari seluruh komponen lain;di sinilah komponen penting lainnya terpasang, seperti hard disk, prosessor, memori, dan lainnya. Prosesor adalah bagian dari komponen komputer yang bertugas sebagai otak mesin. Ada pula RAM yang merupakan komponen yang bertugas menyimpan data sementara dari program yang tengah dijalankan. Video card dan sound card menjad