PENDAHULUAN
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..bahasa pascal juga membantu anda yang masih belajar pemograman dan untuk yang masih kuliah bisa mempergunakan bahasa pemograman pascal..semoga bermanpaat .
Kode pemograman luas persegi panjang, luas segitiga dan luas lingkaran
Berikut ini merupakan logika pemrograman untuk program penghitung luas persegi panjang.
Langkah pertama adalah menerima inputan panjang dan lebar persegi panjang dari user
Langkah kedua adalah menghitung nilai luas persegi panjang dengan mengalikan nilai panjang dan nilai lebar persegi panjang yang diinputkan oleh user
Langkah ketiga adalah menampilkan nilai luas persegi panjang yang telah dihitung
Berikut ini merupakan source code program luas persegi panjang di C++
/*
* File: LuasPersegiPanjang2.cpp
* Author: indrabt
*
* Created on July 2, 2010, 4:44 PM
*/
#include <stdlib.h>
#include <iostream>
using namespace std;
/*
*
*/
int main(int argc, char** argv)
{
int p, l, luas;
cout << “masukkan nilai panjang : “;
cin >> p;
cout << “masukkan nilai lebar : “;
cin >> l;
luas = p * l;
cout << “luas persegi panjang : ” << luas<<”\n”;
return (EXIT_SUCCESS);
}
Statement int p, l, luas digunakan untuk mendeklarasikan variabel p, l, dan luas dengan tipe data integer. Variabel p digunakan untuk menyimpan nilai panjang persegi panjang yang diinputkan oleh user. Variabel l digunakan untuk menyimpan nilai lebar yang diinputkan oleh user. Sedangkan variabel luas digunakan untuk menyimpan nilai perhitungan luas persegi panjang.
statement cout <<”masukkan nilai panjang :” digunakan untuk mencetak masukkan nilai panjang pada layar konsole. Sedangkan cin >> p digunakan untuk menyimpan nilai panjang persegi panjang yang dimasukkan oleh user ke dalam variabel p. Sedangkan statement cout << “masukkan nilai lebar :” digunakan untuk mencetak kalimat masukkan nilai lebar pada layar console. Statement cin >> l digunakan untuk menyimpan nilai lebar persegi panjang yang diinputkan oleh user ke dalam variabel l. Langkah berikutnya adalah menghitung luas persegi panjang yang dilakukan oleh statement luas = p * l. Langkah terakhir adalah menampilkan luas persegi panjang telah dihitung. Hal ini dilakukan oleh statement cout << “luas persegi panjang : ” << luas<<”\n”.
rocedure segitiga (var a: integer; var b: integer);
var luas: real;
begin
luas:= a*b*0.5;
ShowMessage('luas segitiga adalah' + floattostr(luas));
end;
procedure TForm1.Button1Click(Sender: TObject);
var a,b:integer;
begin
a:=strToint(edit1.text);
b:=strToint(edit2.text);
begin
segitiga(a,b);
end;
end;
end.
Luas Lingkaran
Untuk Program yang statis (tidak ada proses input, nilai jari-jari ditentukan di dalam kode program) :
#include <iostream>
#include <conio>
#define phi 3.14
main()
{
float r=15;
float luas=phi*r*r;
float keliling=phi*r*2;
cout<<"Program volume dan luas Lingkaran\n";
cout<<"\nJari-jari\t= "<<r;
cout<<"\n--------------------------";
cout<<"\nLuas\t\t= "<<luas;
cout<<"\nKeliling\t= "<<keliling;
getch();
}
