PROGRAM MENENTUKAN LUAS SEGITIGA MENGGUNAKAN PASCAL

 Image result for turbo pascal
setelah kemarin saya share tentang koding-koding C++, sekarang saya akan share tentang saudara dari C++, yaitu Turbo Pascal =)). Kedua Bahasa Pemrograman Ini mempunyai perbedaan. tentunya dari kodingnya. nanti anda akan tau sendiri letak perbedaannya. Tapi tetap memiliki Logika yang sama. kali ini saya akan share tentang program sederhana menghitung luas segitiga. kodingnya kira-kira seperti dibawah ini.


screen shot di atas, saya menggukan LAZARUS pascal. sebenarnya sama saja dengan turbo pascal. cuma dari segi penampilan aja yang beda. Lazarus lebih modern. kalo koding di atas kurang jelas, lihat saja tulisan merah dibawah ini :

program tugas4;
uses wincrt;
var a,t:integer;
L:real;
begin
      clrscr;
      write('Alas Segitiga = ');readln(a);
      write('Tinggi Segitiga = ');readln(t);
      writeln;
      L:=(a*t) div 2;
      write('Luas Segitiga Adalah = ',L:5:2);
      writeln;
end.

Masih kurang jelas ??? saya rasa mata anda yang jadi masalah =)). setelah mengetik koding diatas, silahkan tekan tombol ctrl+F9 pada keyboard. hasilnya akan seperti gambar dibawah ini. kalo kodingnya ga error.


 gambar d atas compile nya pake Turbo Pascal =)). soalnya kalo pake Lazarus, lama banget.

sekian dulu sharingnya kali ini. semoga bermanfaat ya. jangan lupa sharing ke teman-teman yang membutuhkan.
Previous
Next Post »