-
What is Algoritma?
Algoritma merupakan konsep dasar dari sebuah program. Dalam pembuatannya dibutuhkan daya nalar yang baik dan logis. Algoritma terdiri dari beberapa langkah dalam penyelesaian masalah. Namun perlu diketahui, langkah-langkah dalam algoritma dibatasi oleh obyek masalah yang dihadapinya. Bahasa pemrograman adalah alat untuk berkomunikasi. Brainware dengan mesin computer. Bahasa pemrograman terdiri dari berbagai macam, contohnya seperti Pascal,…
-
Dani Record
Kasus : Program ini akan merekam informasi mengenai 20 data buku-buku yang ada meliputi judul buku, kode, pengarang, edisi, tahun terbit, dan penerbitnya. Output yang diharapkan adalah berupa tabel yang menampilkan informasi data buku yang telah direkam secara terurut ascending dengan metode sorting berdasarkan judul buku. Demikianlah kira-kira gambaran tentang program tersebut.. uses wincrt; type…
-
Program Pertukaran Uang Rupiah dan Dolar
Dibawah ini adalah program pertukaran uang dari rupiah ke dolar atau sebaliknya dari dolar ke rupiah menggunakan percabangan if or then else. uses wincrt; var a : char; j,ntr,ntd,h,s : longint; satuan1,satuan2 : string; begin write (‘tukar rupiah atau dolar ? (r/d) ‘); readln (a); writeln; if (a=’r’) or (a=’R’) then begin write (‘jumlah rupiah…
-
Pandapotan Record
uses wincrt; Type mahasiswa = record Nama: string[15]; Nim:string[10]; IPK: real; end; Var Mhs: Mahasiswa; type tipesiswa=record Nama: string[15]; end; begin write(‘nama : ‘);readln(mhs.nama); write(‘nim : ‘);readln(mhs.nim); write(‘IPK : ‘);readln(mhs.IPK); writeln; writeln(‘Nama anda:’,mhs.nama); writeln(‘nim anda:’,mhs.nim); writeln(‘IPK anda:’,mhs.IPK:4:2); end.
-
Pandapotan Array
Uses Wincrt; Var bilangan : array[1..50] of integer; begin ClrScr; Bilangan[1]:=3; Bilangan[2]:=29; Bilangan[3]:=30; Bilangan[4]:=31; Bilangan[5]:=23; writeln(‘nilai variabel bilangan ke 3=’,bilangan[3]); readln; end.
-
Dani Array
Array atau larik adalah tipe terstruktur yang terdiri dari sejumlah komponen yang mempuyai tipe sama.Merupakan variable yang berindeks. Perbedaannya dengan variabel biasa adalah pada tempat penyimpanan data. Varibel biasa hanya memiliki satu tempat data sedangkan array mempunyai beberapa tempat yang diinginkan. Format penulisan untuk mendeklarasikan tipe data array adalah seperti berikut : NamaVariabel : array[1..10]…
-
Aljan Array dan Record
ARRAY Array adalah tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama. LISTING PROGRAM: program aljan; Uses winCrt; Var nil1 : Array[1..100] of Integer; n,i,j,dum : Integer; Begin ClrScr; Write(‘mau isi berapa data acak (integer) =’); readln(n); For i := 1 to n Do Begin Write(‘Data Ke ‘,i,’:’);Readln(nil1[i]); End; {* penyapuan proses}…
-
Hendra Array & Record
Contoh program data pribadi dengan pascal USES WINCRT; TYPE DATA = RECORD NAMA : STRING[25]; ALAMAT : STRING[30]; JK : STRING ; TELP : STRING [10]; TANGGALLAHIR : STRING[20] ; END; VAR a : data; JAWABAN : CHAR; BEGIN REPEAT CLRSCR; BEGIN WRITE (‘NAMA :’);READLN(a.NAMA); WRITE (‘ALAMAT :’);READLN (a.ALAMAT); WRITE (‘JK ;’);READLN (a.JK); WRITE (‘TELP…
-
Program yang Menggunakan Record
Contoh program sederhana data mahasiswa uses wincrt; type mahasiswa = record nrp: string; nama: string; alamat:string; end. var mhs : mahasiswa; begin write(’Inputkan nama’);readln(mhs.nama); write(’Inputkan nrp’);readln(mhs.nrp); write(’Inputkan alamat’);readln(mhs.alamat); {dengan begitu kita sudah mempunyai sebuah entitas mahasiswa lengkap dengan nilai atributnya untuk menampilkan datanya} writeln(mhs.nama,mhs.nrp,mhs.alamat); end.
-
Program Bilangan Prima dengan Menggunakan Bantuan Array
Contoh program : Program Mencari_Bilangan_Prima_Dengan_Array; Uses Crt; Var Prima : Array[1..100] of Integer; i,j : Integer; bil : Integer; Begin ClrScr; For i := 2 to 100 Do Begin Prima[i]:=i; For j:= 2 to i-1 Do Begin bil := (i mod j); {* i dibagi j dicek apakah 0*} If bil = 0 then Prima[i]:=0;…