Memahami Type Data Variable pada Pascal

Hola teman-teman, gimana nih kabarnya? semoga baik-baik semua ya,
mengingat cuaca lagi gak tentu pasti bayak virus penyakit yang bertebaran.
temen - temen harus jaga kesehatan biar kita bisa tetap bekatifitas dan tentunya Belajar Bahasa Pemprograman supaya kita bisa semakin PINTAR CODING :D


Temen-temen masih ingat kan cara mendefinisikan variable dan constants pada Pascal? mudah kan? tapi mungkin di atara temen-temen masih banyak yang bingung mengenai penggunaan type data pada pascal, pada intinya typedata itu dirancang untuk suatu keperluan pemprosesan data yang berbeda - beda.

Kita mulai dengan sedikit flashback ke materi kita sebelumnya, yaitu pengenalan type data, variable, constans dan operator pada Bahasa Pemprograman Pascal.
Pada artikel saya sebelumnya saya contohkan membuat program perhitungan luas persegi panjang dan keliling lingkaran.

Coba deh temen-temen analisa. kira-kira apa yang membedakan dari kedua script yang saya contohkan? Mengapa type data yang saya gunakan untuk perhitungan berbeda?

yah, dari bahasan sebelumnya sudah saya tuliskan bahwa suatu type data itu hanya menghandle untuk suatu proses tertentu.

Pada contoh 1 (luas persegi)

Program LuasPersegiPanjang;
Uses crt;
Var
 Luas,p,l : integer; //Menggunakan Type data INTEGER

Begin
 clrscr;
 p := 50;     //mengisi variabel p
 l := 100;     //mengisi variabel l
 Luas := p * l;  //perhitungan luas disimpan pada variable Luas

 Write('Luas Persegi Panjangnya adalah : ',Luas); //mencetak hasil nya
 Readln();
End.

Saya menggunakan type data integer karena data angka yang akan di proses adalah bilangan bulat (positif/negatif)
Sebenarnya jika kita menggunakan type data real itu bisa saja, akan tetapi akan terjadi pemborosan ruang memory dan lebih menyulitkan kita utnuk melakukan pembatasan tampilan bilangan di belakan koma padahal sudah jelas nilai nya 0 (useless script)

Berbeda dengan contoh 1, pada contoh 2 (keliling lingkaran)

Program KelilingLingkaran;
Uses crt;
Var
 K, r : real; // Menggunakan Type Data REAL
Const
 PHI = 3.14;
Begin
 clrscr;
 r := 7.0;  // mengisi variable r
 K := 2 * PHI * r; //perhitungan keliling lingkaran
 Write('Keliling lingkaranya : ',K:3:2); //mencetak variable real K,
  //var:digit-depan:digit-belakang
  // syntax untuk pembatasan digit angka
  // K:3:2 = variabel K, 3 digit didepan titik dan
  // 2 digit dibelakang titik
 Readln;
End.

Saya menggunakan real karena perhitungan kita memerlukan bilangan pecahan.
Coba temen-temen ubah type data variable pada script keliling lingkaran dengan menggunakan integer, apa yang akan terjadi?

yah, seperi pada gambar scriptnya akan error (incompatible types) karena integer tidak mampu menanagai bialngan pecahan (tidak kompetibel/cocok),
Jadi intinya, penggunaan type data tergantung pada data apa yang akan kita proses.

Seperti yang saya sampaikan sebelumnya operator yang digunakan untuk perhitungan ke dua type data tersebut adalah sama, yang membedakan hanyalah untuk operator Pembagi, untuk pembagian bulat/integer temen-temen harus menggunakan  DIV  sedangkan untuk pembagian bilangan pecahan (real) temen-temen bisa menggunakan  DIV  atau tanda " / "
karena pembagian menggunakan tanda  " / "  hanya di khususkan untuk mengembalikan hasil pembagian bilangan pecahan (yang pastinya hasilnya juga adalah pecahan).

Mudah bukan? sekarang pasti temen-temen sudah paham :)

nah kalau begitu sekarang saat nya

ANSWER THE QUESTION!!!

Udah pada coba ngerjain soal yang saya buat kenarin?
Hah belum :( ?
Apa susah? gak ngerti ? :(

Oke deh tidak apa-apa maklum namanya juga belajar, kalo gitu mari kita bahas bersama-sama :)

Masih ada hubungannya dengan Type data, Variable dan Operator.
Pada pertanyaan yang saya buat sebelumnya kita akan memanipulsai kata, jadi kita gunakan Type data    STRING  .

Gimana sih caranya?

Berkut ini salah satu cara untuk menyatukan kata dalam Bahasa Pemprograman Pascal :

Program ManipulasiText;
Uses crt;
Var
  text1, text2 : string;
Begin
  clrscr;
  text1 := 'Fujisaki';
  text2 := 'Yuusuke';
  Writeln('Nama Saya : ',text1,' ',text2);
  readln;
End.

Dan hasilnya adalah :

Nama Saya : Fujisaki Yuusuke

uwih,, selesai,, mudah kan? hehehe

Nah sekarang selain menggabungkan 2 kata , kita juga bisa memanipulasi kata-kata tersebut, seperti menghitung jumlah hurufnya dan mengcopy isi dari variable yang kita buat.

Berikut ini dalah contoh script nya :

program ManipulasiString2;
uses sysutils,crt;
var
   text1, text2, text3 : ansistring;
   text4, text5: string;
   len: integer;
begin
   clrscr;
   text1 := 'Halo ';
   text2 := 'Dunia!';

  (* copy text1 ke text3 *)
   text3 := text1;
   writeln('appendstr( text3, text1) :  ', text3 );

  (* menyatukan text1 dan text2 *)
   appendstr( text1, text2);
   writeln( 'appendstr( text1, text2) ' , text1 );
   text4 := text1 + text2;
   writeln('Sekarang text4 berisi: ', text4);

  (* menghitung jumlah huruf(lengh) text5  *)
   text5 := 'hitung saya';
   len := byte(text5[0]);
   writeln('jumlah huruf text5 adalah: ', len);
   readln;
end.

Dan hasilnya adalah :

appendstr( text3, text1) :  Halo
appendstr( text1, text2) Halo Duni
Sekarang text4 berisi: Halo Dunia!
jumlah huruf text5 adalah: 11

hore,, selain sudah bisa membuat program perhitungan sekarang kita juga bisa membuat program pengolah kata,, keren,, :))
Mudah kan hehehe,,

Ok cukup sekian dulu belajar kita, Semoga bermanfaat untuk temen-temen dalam memahamai Belajar Bahasa Pemprograman Pascal.

Sampai jumpa di artikel saya selanjutnya :)