Minggu, 02 Desember 2012
Program Array
type dmhs=record
nrp:string[10];
nama:string[25];
alamat:string[50];
end;
var data:array[1..3] of dmhs;
i:integer;
begin
for i:=1 to 3 do
begin
write(‘nrp : ‘);readln(data[i].nrp);
write(‘nama : ‘);readln(data[i].nama);
write(‘alamat : ‘);readln(data[i].alamat);
end;
writeln;
writeln(‘Data ditampilkan’);
for i:=1 to 3 do
begin
writeln(‘nrp : ‘, data[i].nrp);
writeln(‘nama : ‘, data[i].nama);
writeln(‘alamat : ‘, data[i].alamat);
end;
readln;
end.
LOGIKA PEMROGRAMAN ‘Uses Crt’ merupakan salah satu unit di pascal. Unit yang satu ini harus digunakan jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar ‘Var’ merupakan bagian pendeklarasian variabel yang di dalamnya memuat tipe-tipe data, seperti string, integer, byte, word, char, dll. Mengenai tipe-tipe data akan dibahas di artikel selanjutnya. Setiap listing program utama harus diawali dengan huruf ‘begin’ dan diakhiri dengan ‘end.’ (ingat! jangan lupa titik(.) nya pada end.) Perintah untuk mencetak adalah ‘write’. Jadi kalau mau mencetak “Halo, saya pascal” ‘read/readln’ perintah ini digunakan untuk memasukkan (input) data dalam keyboard ke dalam suatu variabel. Tapi selain write, ada juga perintah ‘writeln’. Bedanya kalau ‘write’ setelah mencetak kursornya tetap disamping, sedangkan kalau ‘writeln’ kursornya ke bawah. Untuk contohnya dapat dicermati dari listing program tadi. Perintah ‘read’ dan ‘readln’ digunakan untuk membaca input yang dimasukkan user. Perbedaan antara keduanya sama dengan ‘write’ dan ‘writeln’. Begin yaitu tanda awal memulai nya program yang akan kita jalankan. for(a=1;a<=b;a++) memulai perintah kondisi : untuk variabel a sama dengan 1, jika variabel a kurang dari sama dengan variabel n, maka variabel a akan ditambahkan 1. clrscr(); Perintah membersihkan layar.
Fungsi program C++
Listing program
#include
void sebelum_sesudah (int x, int& sebelum, int& sesudah)
{
sebelum = x-1;
sesudah= x+1;
}
int main ()
{
int x=100, y, z;
sebelum_sesudah (x, y, z);
cout << "sebelum=" << y << ",sesudah=" << z;
return 0;
}
LOGIKA PEMROGRAMAN
#include
Symbol “#” merupakan symbol preprocessor directive. Kalimat atau koding “include(iostream.h)” merupakan preprocessor compiler dengan menyertakan header file standard bertipe “iostream.h”.
main()
Kodingan diatas berfungsi mengawali isi program pada bahasa C, C++, atau Borland. Setelah kodingan ini biasanya akan disertakan tanda / symbol “{“ yang sebelumnya disisipkan symbol “( )”.
clrscr();
Perintah membersihkan layar.
“COUT” berfungsi mencetak output pada layar dengan kaliamat “nama perempuan yang kamu suka :”, sedangkan “cin>>mhs;” berfungsi sebagai inputan dengan memasukannnya kedalam variabel mhs.
getch();
Kodingan / instruksi di atas berfungsi sebagai pengakhir program dan biasanya di akhiri dengan tanda / symbol “}”.
Program Fungsi pascal
.
Listing program
uses crt;
function pengurangan(a,b:integer):integer;
begin
clrscr;
pengurangan:=a-b;
end;
var
d,e:integer;
begin
clrscr;
write('angka 1=');readln(d);
write('angka 2=');readln(e);
write('hasilnya=',pengurangan(d,e));
end.
LOGIKA PEMROGRAMAN
‘Uses Crt’ merupakan salah satu unit di pascal. Unit yang satu ini harus digunakan jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar
‘Var’ merupakan bagian pendeklarasian variabel yang di dalamnya memuat tipe-tipe data, seperti string, integer, byte, word, char, dll. Mengenai tipe-tipe data akan dibahas di artikel selanjutnya.
Setiap listing program utama harus diawali dengan huruf ‘begin’ dan diakhiri dengan ‘end.’
(ingat! jangan lupa titik(.) nya pada end.)
Perintah untuk mencetak adalah ‘write’. Jadi kalau mau mencetak “Halo, saya pascal”
‘read/readln’ perintah ini digunakan untuk memasukkan (input) data dalam keyboard ke dalam suatu variabel.
Tapi selain write, ada juga perintah ‘writeln’. Bedanya kalau ‘write’ setelah mencetak kursornya tetap disamping, sedangkan kalau ‘writeln’ kursornya ke bawah. Untuk contohnya dapat dicermati dari listing program tadi.
Perintah ‘read’ dan ‘readln’ digunakan untuk membaca input yang dimasukkan user. Perbedaan antara keduanya sama dengan ‘write’ dan ‘writeln’.
Begin yaitu tanda awal memulai nya program yang akan kita jalankan.
for(a=1;a<=b;a++)
memulai perintah kondisi : untuk variabel a sama dengan 1, jika variabel a kurang dari sama dengan variabel n, maka variabel a akan ditambahkan 1.
clrscr();
Perintah membersihkan layar.
Program prosedur Pascal
Listing program
program Lsegitiga;
uses crt;
var
i,n:integer;
a,t:real;
procedure hitungLuassegitiga(alas,tinggi:real);
var
luas:real;
begin
luas:=(alas*tinggi)/2;
writeln('luas segitiga=',luas:10:2);
end;
begin
clrscr;
write ( ' banyaknya segitiga ?'); readln(n);
for i:=1 to n do
begin
write(' panjang alas segitiga?');
readln(a);
write('tinggi segitiga?');
readln(t);
hitungluassegitiga(a,t);
readln;
End;
End.
LOGIKA PEMROGRAMAN
Uses crt; adalah index atau kamus yang akan digunakan, ini wajib ada dalam turbo pascal.
Var adalah variabel yang akan digunakan dalam program, di bagian ini saya memasukkan jenis variabel dan type data yang akan digunakan. Misal: saya ingin membuat sebuah variabel yang menampilkan nama maka kita tinggal mengetik Nama:string;. Maksudnya adalah nama variabelnya ‘Nama’ dan type datanya ‘string’. String adalah type data kumpulan huruf atau kalimat. Variabel yang saya gunakan diatas type datanya ada 2. String artinya kalimat atau kata dan real artinya bilangan pecahan.
Di bagian ‘Begin’ adalah kumpulan barisan perintah yang harus dikerjakan oleh komputer, diakhir program harus selalu diakhiri dengan ‘End’.
‘write/writeln’ digunakan untuk menampilkan isi dari suatu nilai variabel di layar.
‘read/readln’ perintah ini digunakan untuk memasukkan (input) data dalam keyboard ke dalam suatu
Langganan:
Postingan (Atom)