Archive for Januari 2015
Menghitung Luas Segitiga Menggunakan Delphi
Holaa kawan blogger, masih dihari yang sama aku mau berbagi pada kalian semua tentang tutorial menghitung luas segitiga masih menggunakan bahasa pemrograman pascal.
Oke langsung saja, seperti biasa aku mengunakan aplikasi Delphi 2010. Langkah~langkahnya sebagai berikut.
1. Buka aplikasi Delphi terlebih dahulu. seperti biasa langkah~langkahnya masih sama yakni pilihFile>>New>>Other>> .
Mengubah Ekspresi Matematika ke dalam Bahasa Delphi/ Pascal
Assalamu'alaikum Ketemu lagi dengan postingan~postingan aku seputar "Algoritma dan Pemrograman".Postingan kali ini membahas tentang "Mengubah Ekspresi matematika ke dalam Bahasa Delphi/Pascal". Semoga tahun ini menjadi tahun yang lebih baik dan lebih ini buat kita semua, aamiin ….Oke langsung saja kembali pada topik. Sebelumnya udah aku kasih postingan tentang Ekspresi matematika yang lebih mudah tentang "Luas Persegi panjang dan Luas segitiga". Kalo kalian udah lupa, kalian bisa scroll down asrip blog aku disana pasti ada deh! Sekalian kita flashback gitu?? Kali ini kita akan merubah 7 Ekspresi matematika yang sedikit lebih sulit dari postingan sebelumnya ke dalam Bahasa Delphi. Berikut ini 7 Ekspresi matematika yang aku maksud, yakni:
a. Ekspresi Matematika Pertama (E = mc2 )
E = mc2 dalam ilmu fisika adalah sebuah rumus yang sering dikenal dan sangat penting dalam menjelaskan persamaan nilai antara energi (E) dan massa (m), yang disetarakan secara langsung melalui konstanta kuadrat laju cahaya dalam vakum ( c 2 ).
,
yang mana:
· E = energi (J)
· m = massa (kg)
· c = kecepatan cahaya (m.s-1)
program exprsi_mtk_1;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
e: real;
m,c: integer;
begin
writeln('NAMA: Syamsul Rizal');
writeln('KELAS: 1-B');
writeln('NIM: 114224071');
writeln('JURUSAN: S-1 Teknik Informatika STMIK YADIKA BANGIL');
writeln(' ');
writeln(' E: m.(c.c) ');
writeln;
write(' masukkannilai m = '); readln(m);
write(' masukkannilai c = '); readln(c);
e:= m* SQR(c);
writeln(' E: m x quadrat dari c = ',e:10:2);
readln;
end.
Salin script berikut ini pada delphi kalian untuk membuat program ekspresi matematika diatas.
Jika tersalin seperti pada gambar dibawa ini, jalankan programnya.
Keterangan Program:
e: real maksudnya ialah nilai e menggunakan type data bilangan desimal.
m,c :integer maksudnya ialah niali m dan c menggunakan type data bilangan bulat.
SQR(c) maksudnya ialah nilai c merupakan angka kuadrat.
.