CONTOH SCRIPT DASAR PEMBUATAN PROGRAM PADA DELPHI 7 (Part 1)

Pastinya sudah bisa membuka Delphi semua kan,, ya.. Seperti waktu pelajaran komputer waktu SMP dulu lah, tinggal klik start terus pilih Delphi7, atau yang sudah ada shorcut di dekstopnya, tinggal klik pada icon Delphi7.

Kalau Program Delphi kamu Normal, akan muncul tampilan lembar kerja Delphi seperti yang terlihat pada bawah ini.

Kemudian kita langsung ke lembar kerja kita pilih
File - New - Other

Setelah itu kita pilih Console Application

Kali ini saya beri Contoh Script dasar pembuatan program sederhana Rumus Luas Segitiga

Program Luas_Segitiga;
{$APPTYPE CONSOLE}
uses
  SysUtils;
Var
Alas,tinggi:Integer;
Luas:real;
begin
Write('Masukan luas=');Readln(alas);
Write('masukan tinggi=');Readln(tinggi);
Luas :=0.5*Alas*Tinggi;
Writeln('alas=',luas:10:2);
REadln;
end.

Dan ini adalah hasil dari percobaan Script Rumus Luas Segitiga

Silahkan Mencoba ^_^..