Senin, 09 Desember 2013

Manfaat Belajar Turbo Pascal

Manfaat turbo pascal ini tidak terbatas untuk membantu sistem administrasi dikantor-kantor saja, tetapi merambah kebeberapa bidang. Sehingga aplikasinya sangat dibutuhkan untuk membantu berbagai disiplin ilmu.Untuk itulah dibutuhkan software yang menjebatani komputer dengan kebutuhan dan tujuan pemograman komputer friendly. sebuah software akan memudahkan untuk membuat aplikasi seperti : bahasa C, C++, C#, Clipper, LISP, ADA, ALGOL, Modula 2, Smalltalk,Prolog, Perl, PHP, ASP, JSP, J#, J++, Cobol, Basic, Fortran, Java, Paskal, dan lain sebagainya.
Bahasa pemrograman adalah sesuatu yang mutlak harus dipahami jika inginmembuat suatu aplikasi. Berdasarkan hal tersebut maka perlu kiranya kita belajar sebuah bahasa pemrograman yang lebih sederhana dan relatif lebih mudah untuk dipelajari oleh seorang pemula. Bahasa pascal adadalah salah satu jenis bahasa tingkat tinggi yang relatif lebih mudah untuk dipelajari.
Bahasa pemograman pascal adalah salah satu bahasa tingkat tinggi yang merupakan bahasa pemograman prosedural yang banyak dipakai untuk mengenalkan pemograman bagi pemula, selain itu bahasa pascal relatif mudah untuk dipelajari, sehingga daapat diadakan sebagai dasar acuan untuk belajar bahasa pemograman telah banyak literatur mengenai bahasa pemograman pascal dengan berbagai versi. yang semakin memudahkan mempelajarinya. Program dalam bahasa pemograman pascal cukup banyak variannya seperti delfi yang merupakan visual pascal juga masih banyak lagi. pascal juga memliki beberapa versi yang beredar dipasaran seperti UCSD pascal, Ms-Pascal, apple pascal, free pascal, turbo pascal dan sebagainya.
Adapun kelebihan dari bahasa pemrograman Pascal adalah:
1.      Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe data standar: boolean, integer, real, char, string,
2.      User defined Data Types, programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar.
3.      Strongly-typed, programmer harus menentukan tipe data dari suatu variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe data selain dari format yang ditentukan.
4.      Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang.
5.      Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami.

Pemrograman Pascal

1. Struktur pertama dalam pascal adalah.....
    a. Char;
    b. String
    c. End.
    d. Writeln
    e. Uses Crt;
 Jawaban : e. Uses Crt;
Alasan     : dalam struktur pascal USES CRT berada di bagian pertama, jadi                                                  apabila memilih yang lain programnya tidak akan jalan.

Artikel HTML

Artikel HTML

          Artikel ini merupakan artikel pendahuluan sehubungan dengan tutorial HTML dasar bagi para pengguna internet yang ingin membuat homepage pribadi sendiri.  Karena itu, yang dibahas kali ini hanya pengenalan singkat tentang HTML dan beberapa perangkat lunak.  Pada artikel yang mendatang akan dibahas elemen HTML lainnya.  Semoga artikel ini berguna bagi para pengguna internet.

Definisi HTML
            HTML merupakan singkatan dari HyperText Markup Language. HTML adalah dokumen text yang bisa dibaca untuk dipublikasikan di World Wide Web (WWW), dan semua nama file dokumen HTML mempunyai ekstensi html atau htm. 
Dalam sebuah dokumen HTML anda akan melihat tags. Tags adalah penempatan atau nilai format teks yang memerintahkan browser untuk menampilkan sebuah dokumen html. 
Contoh sebuah dokumen HTML sederhana adalah sebagai berikut:

<HTML>
<BODY>
Hallo ... </BODY>
</HTML>

Browser
Browser adalah program yang dipakai untuk membaca dokumen HTML pada WWW. Contoh browser ini antara lain: Google Chrome, Netscape Navigator, Internet Explorer, Opera, Mozilla Firefox, dan sebagainya.

Pengertian HTML Tag
Tag dipakai untuk mendeskripsikan sesuatu tentang dokumen HTML.
Tag diletakkan dalam kurung,
<seperti ini>. dipakai untuk mendeskripsikan sesuatu tentang dokumen HTML.
Tag diletakkan dalam kurung,
<seperti ini>.
Tag ada 2 macam; tag tunggal dan tag berpasangan. Perbedaannya, kalau tag tunggal munculnya sendiri, sedangkan tag yang berpasangan harus ada bagian yang mengawali dan mengakhiri.  Bagian yang mengakhiri sama dengan yang mengawali, tapi diawali dengan garis miring (/).
Contoh tag tunggal:
  • <P> menandai akhir dari sebuah paragraf
  • <BR> menandai akhir sebuah baris.
  • <HR> membuat sebuah garis horisontal.
Contoh tag berpasangan:
  • <BODY> dan </BODY> menandai awal dan akhir dari tubuh dokumen.
  • <B> dan </B> untuk membuat karakter cetak tebal.
<I> dan </I> untuk membuat karakter cetak miring.
HTML Editor
Dokumen HTML bisa dibuat dengan menggunakan text editor biasa ataupun dengan editor khusus.
Contoh-contoh HTML Editor :
·         Microsoft Frontpage 
·         Macromedia Dreamweaver
·         Netscape Navigator Gold
·         Netscape Composer
·         HotDog
·         CU-HTML, dll

URLs
URL merupakan singkatan dari Uniform Resource Locator. Menginformasikan lokasi sebuah file pada WWW dan juga mengidentifikasi layanan internet, seperti FTP, WWW, yang menghandle file tsb. Istilah ini juga dipakai untuk menunjukkan suatu tempat yang berisikan informasi di Internet. 

Keterangan : 
Protocol adalah metode transfer data dari satu komputer ke komputer lain. Antara komputer client dan komputer server. 
·         HTTP; HyperText Transfer Protocol
·         Gopher
·         FTP
·         news
Network location adalah mesin tempat data tersebut berada.
path - dokumen - menunjukkan di direktori mana dokumen tersebut berada.
File name adalah nama file html yang berada dalam direktori web server.

Struktur Dokumen HTML
Format dasar dari dokumen HTML adalah sebagai berikut:

<HTML>
<HEAD>
<TITLE>
Judul berada di sini</TITLE>
</HEAD>
<BODY>
   dokumen utama
</BODY>
</HTML>
atau
<html>(-- always start your document with this tag
<head>
(-- recommend having the <head> and </head> tags
<title>Give a title for your HTML document</title>  
           (-- always have a title for your document

(-- to allow search engines to search and find your page correctly
<meta name="description" content="good description of your page">
<meta name="keywords" content="keywords separated by commas">
</head>

<body>
The HTML document proper. Here will be the actual HTML document with the hypertext links, images and formating tags. Put this part within the body tags.
</body>

</html>
(-- always end your HTML document with this tag

Contoh Penggunaan If dalam Program Turbo Pascal

  Program  Sewa Sepeda
 Listing Program
program sewa_sepeda;
uses wincrt;
var
    nama:string;
    harga:real;
    jam:real;
    ket3:string;
begin
clrscr;
harga:=5000;
ket3:='data salah';
writeln('Harga Sewa Sepeda /jam = Rp. 5000');
write('Nama Penyewa : ');
readln(nama);
write('Jumlah Jam : ');
readln(jam);
    if (jam<=1)then
        begin
        harga :=harga;
        writeln(' Jumlah Bayar :Rp. ',harga:2:2);
        end
    else if (jam=2)then
        begin
        harga:=harga*2;
        writeln(' Jumlah Bayar  :Rp. ',harga:2:2);
        end
    else if (jam=3)then
        begin
        harga:=harga*3;
        writeln(' Jumlah Bayar  :Rp. ',harga:2:2);
        end
    else if (jam=4)then
        begin
        harga:=harga*4;
        writeln(' Jumlah Bayar  :Rp. ',harga:2:2);
        end
    else if (jam=5)then
        begin
        harga:=harga*5;
        writeln(' Jumlah Bayar  :Rp. ',harga:2:2);
        end
    else
        begin
        writeln('TIDAK BOLEH LEBIH DARI 5 JAM');
        end;
    end.


 Output Program

Contoh Penggunaan Procedure dalam Program Turbo Pascal

Listing Program
Program Hitung_Nilai;
Uses Wincrt;
Type Larik = array [1..100] of integer;
Var nilai,A,B,C,D,E : Larik;
n,i,tot : Integer;
mean,sdt,sd : real;
iA,iB,iC,iD,iE : Integer;
yt: char;
Procedure input;
Begin
Writeln('Program Hitung Nilai');
Writeln('====================');
Write('Jumlah Data : ');readln(n);
Writeln;
Randomize;
For i:= 1 to n do
Begin
Write('Masukan Nilai [0..100] ke-',i,' : ');Readln(nilai[i]);
End;
Writeln;
End;
Procedure hitung_mean_sd;
Begin
tot:=0;
sdt:=0;
For i:= 1 to n do
Begin
tot:=tot+nilai[i];
End;
mean:=tot/n;
For i:= 1 to n do
Begin
sdt:=sdt+sqr(nilai[i]-mean);
End;
sd:=sqrt(sdt/(n));
End;
Procedure cari_nilai;
Begin
iA:=0; iB:=0; iC:=0; iD:=0; iE:=0;
For i := 1 to n Do
Begin
If (nilai[i]>=(mean+(1.5*sd))) Then
Begin
Inc(iA);
A[iA]:=nilai[i];
End
Else If ((nilai[i]>=mean+(0.5*sd)) And (nilai[i]<mean+(1.5*sd)))
Then
Begin
Inc(iB);
B[iB]:=nilai[i];
End
Else If ((nilai[i]>=mean-(0.5*sd)) And (nilai[i]<mean+(0.5*sd)))
Then
Begin
Inc(iC);
C[iC]:=nilai[i];
End
Else If ((nilai[i]>=mean-(1.5*sd)) And (nilai[i]<mean-(0.5*sd)))
Then
Begin
Inc(iD);
D[iD]:=nilai[i];
End
Else
Begin
Inc(iE);
E[iE]:=nilai[i];
End;
End;
End;
Procedure urut_desc(z:Integer;Var X:Larik);
Var i,j,T: Integer;
Begin
For i:= 1 to z-1 Do
For j := 1 to z-1 Do
If X[j]<x[j+1] Then {kalau ascending X[j]>x[j+1]}
Begin
T:=X[j];
X[j]:=X[j+1];
X[j+1]:=T;
End;
End;
Procedure tampil;
Begin
Writeln('Rata-Rata Nilai : ',mean:3:2);
Writeln('Standar Deviasi : ',sd:3:2);
Writeln;
Write('Nilai A: ');
urut_desc(iA,A);
For i:= 1 to iA Do
Write(A[i]:3,' ');
Writeln;
Write('Nilai B: ');
urut_desc(iB,B);
For i:= 1 to iB Do
Write(B[i]:3,' ');
Writeln;
Write('Nilai C: ');
urut_desc(iC,C);
For i:= 1 to iC Do
Write(C[i]:3,' ');
Writeln;
Write('Nilai D: ');
urut_desc(iD,D);
For i:= 1 to iD Do
Write(D[i]:3,' ');
Writeln;
Write('Nilai E: ');
urut_desc(iE,E);
For i:= 1 to iE Do
Write(E[i]:3,' ');
Writeln;
End;
procedure kembali;
Begin
write ('Ingin kembali ke menu awal? [Y/T]:');
readln(yt);
end;
Begin
Clrscr;
input;
hitung_mean_sd;
cari_nilai;
tampil;
kembali;
clrscr;
input;
while (yt = 'Y')do
input;
while (yt='y') do
input;
End.

Output Program