-
Pengenalan Array dan String
Array merupakan koleksi data dimana setiap elemen memakai nama dan tipe yang sama serta setiap elemen diakses dengan membedakan indeks array-nya. Berikut adalah contoh variable bernama c yang mempunyai lokasi memori yang semuanya bertipe int. C[0] = -45; C[1] = 6; C[2] = 0; C[3] = 72; C[4] = 1543; C[5] = 43; C[6] =…
-
Program Menghitung Segitiga
#include int main() { int jumlah; cout < < "BERAPA TINGGI SEGITIGA = "; cin >> jumlah; for (int i=1; i
-
Program Data Diri Saya
#include void main() { char nama[20]; char alamat[30]; char tempatlahir[30]; char tanggallahir[30]; char pendidikan[40]; char telpon[30]; char jeniskelamin[40]; cout
-
Program Kode Hari
#include main () { char hari; cout < < "Masukkan kode hari : "; cin >> hari; if (hari==’a’||hari == ‘A’){ cout
-
Program Jadwal Keberangkatan Kereta Api Dari Stasiun Tugu
#include int a; void main(){ Kode_hari: cout < < "Jadwal Pemberangkatan Kereta Api Dari Stasiun Tugu\n"; cout
-
MENU DAN EDITOR TURBO PASCAL 7.0
A. MENU Menu adalah daftar pilihan utama yang terdapat pada Menu Bar ( bagian atas ) jendela Turbo Pascal, yaitu : file, edit, search, run, dll. Sedangkan editor adalah tempat mengetik listing program itu sendiri. 1. Menu file – New : membuat program baru – Open : memanggil program dari disk – Save : menyimpan…
-
ELEMEN – ELEMEN BAHASA DALAM PASCAL
ELEMEN – ELEMEN BAHASA DALAM PASCAL (LANGUAGE ELEMENTS) Sebelum kita membuat sebuah program, maka terlebih dahulu kita harus mengerti tentang elemen- elemen bahasa (Language elements) Turbo Pascal, seperti Reserved word, Statement, Type, Constants, Variabel, Tipe data, Label, Operator, dan lain-lain. a. Reserved Word Reserved word adalah kata – kata yang tidak dapat dijadikan menjadi identifier…
-
Struktur Kondisi dan Struktur Perulangan
PERCABANGAN / KONDISI Percabangan adalah suatu proses pemilihan aksi diantara beberapa alternative yang diberikan. Bentuk umum statemen if : If ( cond-exp) statement ; Bentuk umum statement if … else : If ( cond-exp) statement true Else statement false ; Jika ada lebih dari 1 (satu) instruksi yang akan dijalankan maka harus dibuat dalam bentuk…
-
Program untuk Mencari Akar Persamaan Kuadrat
Program PersamaanKuadrat; uses wincrt; var a,b,c,d,x1,x2 :real; begin clrscr; writeln(‘Menghitung akar-akar persamaan kuadrat’); writeln(‘Nilai a,b,c dimasukkan dengan jeda spasi’); write(‘Masukkan nilai a,b,c:’); readln(a,b,c); d:=(b*b) – (4*a*c); if d < 0 then writeln('tidak ada akar real') else begin x1:=(-b + (sqrt(d)))/(2*a); x2:=(-b - (sqrt(d)))/(2*a); writeln('x1 =',x1:6:2); writeln('x2 =',x2:6:2); end; readln; end.
-
Program Suhu
Program_suhu; uses crt; var suhu : integer ; begin write ( ‘ suhu tubuh: ‘ ) ; readln (suhu) ; if suhu < 28 then writeln ( ' suhu rendah ' ) ; else if suhu > 37 then writeln ( ‘ suhu tinggi ‘ ) ; else writeln ( ‘ normal ‘ ) ;…