Membuat Kalkulator sederhana dengan Turbo Pascal
58 / 100

Turbo Basic adalah kompilerBASIC dan dialek yang awalnya dibuat oleh Robert ‘BobZale dan kemudian dibeli serta diperdagangkan oleh olehBorland. Saat Borland memutuskan untuk menghentikan pengembangannya, Robert Zale membelinya kembali dari Borland, mengganti namanya menjadiPowerBASIC dan kemudian mendirikan perusahaan PowerBASIC Inc. untuk melanjutkan dukungan dan pengembangan perangkat lunak tersebut.[1]

Advertisements

Perangkat lunak ini umum digunakan pada era tahun 1987-88 dan menampilkanlayar hitamsebagai ciri khas Borland yang serupa denganTurbo Pascal 4.0, Turbo C 1.0/1.5, andTurbo Prolog 1.1. Borland tidak mengadopsi ciri khaslayar birupada lingkungan pengembangan terintegrasi hingga periode 1989 saat Turbo C 2.0, Turbo C++ 1.1, dan lain-lain ditembangkan. This time, Turbo Basic dan Turbo Prolog sudah tidak lagi diperdagangkan.

Advertisements

Tidak seperti implementasi BASIC yang ada umumnya saat ini, Turbo Basic merupakan kompiler yang benar-benar menghasilkan kode biner yang langsung dapat dijalankan pada sistem operasi MS-DOS. Sementara produk lainnya merupakan sebuahinterpreter, orP-Code (pseudo code) yang sangat bergantung pada sebuah pustaka runtime. Lingkungan pengembangan terintegrasi yang ada dapat menjalankan program BASIC untuk kebutuhandebugging, atau menghasilkan fileEXE untuk MS-DOS yang benar-benar mandiri dan dapat dijalankan pada sistem lain meski tanpa melibatkan produk Turbo Basic atau keberadaan pustaka runtime.

Advertisements
Contoh pnulisan
INPUT "Siapa nama anda:", A$
 PRINT "Halo "; A$
 DO
   S$ = ""
   INPUT "Berapa banyak bintang yang akan ditampilkan"; S
   FOR I = 1 TO S
     S$ = S$ + "*"
   NEXT I
   PRINT S$
   DO 
     INPUT "Anda ingin menampilan lebih banyak tanda bintang"; Q$
   LOOP WHILE LEN(Q$) = 0
   Q$ = LEFT$ (Q$, 1)
 LOOP WHILE (Q$ = "Y") OR (Q$ = "y")
 PRINT "Sampai jumpa "; A$

source https://id.m.wikipedia.org/wiki/Turbo_Basic

By admin

Writer

Leave a Reply

Your email address will not be published. Required fields are marked *