Pengurutan Data Dengan Pascal

uses wincrt;
var A : array [0..99] of integer ;
i,j,N,temp:integer;
pilih:char;
begin
write (' Berapa masukan anda (maks 100)='); readln(N);
for j:=0 to (N-1) do
begin
write(' Data yang ke',j+1,'=');
readln(A[j]);
end;
write('hasil ditampilkan secara ascending atau discending(a/d)?');readln(pilih);
if (pilih='a') OR (pilih='A')then
begin
for i:=1 to (N-1) do
begin
for j:=i downto 1 do
begin
if A[j] < A[j-1] then
begin
temp:=A[j];
A[j]:=A[j-1];
A[j-1]:=temp;
end;
end;
end;
writeln('Hasil setelah pengurutan adalah');
for j:=0 to (N-1) do
begin
writeln(A[j]);
end;
end;
if (pilih= 'd') or (pilih='D') then
begin
for i:=1 to (N-1) do
begin
for j:=i downto 1 do
begin
if A[j] >A[j-1] then
begin
temp:=A[j];
A[j]:=A[j-1];
A[j-1]:=temp;
end;
end;
end;
writeln ('Hasil setelah pengurutan adalah');
for j:=0 to(N-1) do
begin
writeln(A[j]);
end;
end;
end.

Data Mahasiswa

uses wincrt;
type simpul = ^data;
data = record
huruf : char;
indeks :integer;
next: simpul;
end;
var awal,akhir,baru,bantu,del: simpul;
i,jwb,j:integer;
procedure input_nama(var i:integer);
begin
clrscr;
new(baru);
if awal=nil then
begin
baru^.next:=nil;
awal:=baru;
akhir:=baru;
end
else
begin
akhir^.next:=baru;
akhir:=baru;
akhir^.next:=nil;
end;
write('Masukkan huruf Dari nama Anda : ');readln(baru^.huruf);
i:=i+1;
baru^.indeks:=i;
write('Tekan ENTER Untuk Kembali Ke MENU ');readln;
end;
procedure tampil_nama;
begin
clrscr;
write('Nama Anda : ');
baru:=awal;
while (baru <> nil) do
begin
write(baru^.huruf);
baru:=baru^.next;
end;
writeln;
write('Tekan ENTER Untuk Kembali Ke MENU ');readln;
end;
procedure cek_nama(i:integer);
begin
bantu:=awal;
del:=bantu^.next;
while (del^.indeks <>i)and(bantu^.next <>nil) do
begin
bantu:=bantu^.next;
del:=bantu^.next;
end;
if del <>nil then
begin
if del <>akhir then
bantu^.next:=del^.next
else
begin
akhir :=bantu;
akhir^.next:=nil;
end;
dispose(del);
end;
end;
procedure hapus_nama;
begin
clrscr;
if awal = nil then
writeln('Daftar Masih Kosong ')
else if awal^.indeks = i then
begin
del:=awal;
awal:=del^.next;
dispose(del);
end
else
begin
cek_nama(3);
cek_nama(5);
cek_nama(6);
writeln('Huruf ke 3, 5, 6 sudah dihapus');
end;
write('Tekan ENTER Untuk Kembali Ke MENU ');readln;
end;
begin
i:=0;
repeat
clrscr;
gotoxy(15,1);writeln('Menu Nama');
gotoxy(5,2);writeln('<1>Input Nama ');
gotoxy(5,3);writeln('<2>Hapus Huruf Ke 3,5,6 ');
gotoxy(5,4);writeln('<3>Tampilkan Nama ');
gotoxy(5,5);writeln('<4>Keluar Menu ');
gotoxy(30,6);writeln(' ');
gotoxy(5,6);write('Tentukan Pilihan Anda : ');
gotoxy(30,6);readln(jwb);
case jwb of
1:input_nama(i);
2:hapus_nama;
3:tampil_nama;
end;
until (jwb =4);
clrscr;
end.

Membuat Matrik dengan Pascal

uses wincrt;
var A :array [1..15,1..15] of integer;
i,j,k,m,n,jawab:integer;
procedure input;
begin
clrscr;
write('Masukkan Jumlah Kolom Matriks A : ');readln(m);
write('Masukkan Jumlah Baris Matriks A : ');readln(n);
if m=n then
begin
write('Masukkan Elemen-elemen Matriks A : ');
for k :=1 to m do
begin
gotoxy(1,k+3);write('|');
gotoxy((3*m)+1,k+3);write('|');
end;
for i:=1 to n do
begin
for j:=1 to m do
begin
gotoxy((3*j)-1,i+3);readln(A[i,j]);
end;
end;
end
else
write('Maaf Jumlah Baris Dan Kolom Harus Sama ');
writeln;
write('Tekan ENTER Untuk Kembali Ke Menu ');readln;
end;
procedure tampil1;
begin
clrscr;
write('Matriks A : ');
for k :=1 to m do
begin
gotoxy(1,k+1);write('|');
gotoxy((3*m)+1,k+1);write('|');
end;
for i:=1 to n do
begin
for j:=1 to m do
begin
gotoxy((3*j)-1,i+1);write(A[i,j]);
end;
end;
writeln;
write('Tekan ENTER Untuk Kembali Ke Menu ');readln;
end;
procedure tampil2;
begin
clrscr;
write('Matriks A Dengan ordo M=N : ');
for k :=1 to m do
begin
gotoxy(1,k+1);write('|');
gotoxy((3*m)+1,k+1);write('|');
end;
for i:=1 to n do
begin
for j:=1 to m do
begin
if j=i then
begin
gotoxy((3*j)-1,i+1);write(A[i,j]);
end;
end;
end;
writeln;
write('Tekan ENTER Untuk Kembali Ke Menu ');readln;
end;
begin
repeat
clrscr;
gotoxy(15,1);writeln('MENU MATRIKS');
gotoxy(5,2);writeln('<1> Input Matriks A ');
gotoxy(5,3);writeln('<2> Tampilkan Semua Elemen Matriks A ');
gotoxy(5,4);writeln('<3> Tampilkan Elemen Matriks A dengan ordo M=N ');
gotoxy(5,5);writeln('<4> Keluar dari Menu');
gotoxy(20,6);writeln(' ');
gotoxy(5,6);write('Pilihan Anda = ');
gotoxy(20,6);readln(jawab);
case jawab of
1:input;
2:tampil1;
3:tampil2;
end;
until (jawab = 4);
clrscr;
gotoxy(16,12);writeln('<<<<<<>>>>>>');
end.

Program Pembalik Kata

uses wincrt;
const max_elemen=20;
type str = string[20];
stack = record
elemen:array[1..max_elemen] of char;
atas : integer;
end;

var T:stack;
atas:integer;

procedure push(var a :stack; kar:char);
begin
if a.atas = max_elemen then
writeln('STACK SUDAH PENUH ')
else
begin
inc(a.atas);
a.elemen[a.atas]:= kar;
end;
end;
function pop(var a:stack):char;
begin
if a.atas = 0 then
writeln('STACK SUDAH KOSONG')
else
begin
pop:=a.elemen[a.atas];
dec(a.atas);
end;
end;
procedure konversi(var T : Stack);
var Kal:str;
i,j :integer;
begin
write('kalimat :');readln(Kal);
for i := length(Kal) downto 0 do
begin
if i <> 0 then {jika indeks kalimat belum habis lakukan push atau pop}
begin
if Kal[i] <> ' ' then {jika tidak ditemukan spasi berarti tiap huruf di-Push ke stack}
begin
push(T,Kal[i]);
end
else {jika ditemukan berarti dalam stack telah terisi satu kata}
begin
for j := 1 to T.atas do
begin
write(pop(T)); {Tulis semua huruf dalam stack}
end;
write(' ');
end;
end
else {indeks kalimat sudah habis}
begin
for j := 1 to T.atas do
write(pop(T)); {tampilkan semua huruf dalam stack yang tersisa}
end;
end;
end;
begin {Program utama}
T.atas:=0;
konversi(T);
end.

Program Antrian

uses wincrt;

const Max_Elemen = 10;

type antri = array[1..Max_Elemen] of char;

var Antrian : Antri;
Depan,Belakang,Pilih : integer;
Elemen : char;

procedure Kotak;
var i: integer;

begin
gotoxy(20,15);
for i := 1 to Max_Elemen*4+1 do
write('-');
gotoxy(20,16);
for i := 1 to Max_Elemen do
write('| ');
writeln('|');
gotoxy(20,17);
for i := 1 to Max_Elemen*4+1 do
write('-');
gotoxy(8,16);
write('<---Keluar');
gotoxy(22+Max_Elemen*4+1,16);
writeln('<---Masuk');
end;

procedure Letakkan(x:char; R : integer);
begin
gotoxy(18+4*R,16);
write(x);
end;

function Kosong(Q:Antri):boolean;
begin
Kosong := (Depan = Belakang);
end;

Procedure Tambah(var Antrian : Antri; X :char);
begin
{*Menambah Elemen baru*}
if Belakang = Max_Elemen then
Belakang := 1
else
Belakang := Belakang + 1;

if not(Kosong(Antrian)) then
begin
Antrian[Belakang] := X;
Letakkan(X,Belakang);
end
else
begin
gotoxy(40,9);
Write('Antrian Sudah Penuh');

repeat
{*Menunggu sampai ada penekanan tombol *}
until keypressed;

gotoxy(40,9);
write(' ':30);
Belakang := Belakang-1;
if Belakang = 0 then
Belakang := Max_Elemen;
end;
end;

function Hapus(var Antrian : Antri) : char;
begin
if Depan = Max_Elemen then
Depan := 1
else
begin
Hapus := Antrian[Depan];
Depan := Depan+1;
end;
end;
{*Program Utama*}
begin
clrscr;
Kotak;
Depan := 0;
Belakang := 0;
repeat
for Pilih := 5 to 9 do
begin
gotoxy(40,Pilih);
write(' ':39);
end;
gotoxy(1,1);
writeln('Daftar Menu Pilihan');
writeln('-------------------');
writeln;
writeln(' 1. Menambah Elemen Baru');
writeln(' 2. Menghapus Elemen');
writeln(' 3. Selesai');
writeln;
writeln;
writeln('Pilih salah satu : ');
repeat
gotoxy(22,9);
writeln(' ');
gotoxy(22,9);
readln(Pilih);
until (Pilih >=1) and (Pilih <= 3);

case Pilih of
1: begin
{* Menambah Elemen ke dalam Antrian*}
gotoxy(40,5);
writeln('Menambah Elemen');
gotoxy(40,8);
write('Isikan Elemennya : ');
readln(Elemen);
Tambah(Antrian,Elemen);
end;
2 : begin
{* Manghapus Elemen dari Antrian *}
if not(Kosong(Antrian)) then
begin
Elemen := Hapus(Antrian);
Letakkan(' ',Depan);
end
else
begin
gotoxy(30,9);
writeln('Antrian Kosong...');
Elemen := readkey;
gotoxy(30,9);
write(' ':30);
end;
end;
end;
until Pilih = 3;
end.

Membuat Read File Text

ReadFile.java

import javax.microedition.lcdui.*;
import java.io.*;

public class ReadFile
extends Form
implements CommandListener {
private ReadFileText midlet;
private Display display;
private Command cmExit;
private String help;
private StringItem si;

public ReadFile(ReadFileText midlet, Display display) {
super("Read File Text");
this.midlet = midlet;
this.display = display;

if ((help = readHelpText()) != null) {
si = new StringItem("", help);
} else
si = new StringItem("Error", "File Help Tidak Ditemukan");

append(si);

cmExit = new Command("Keluar", Command.EXIT, 1);
setCommandListener(this);
addCommand(cmExit);
}

public void commandAction(Command c, Displayable s) {
if (c == cmExit)
midlet.exitMIDlet();
}

private String readHelpText() {
InputStream is = getClass().getResourceAsStream("help.txt");
try {
StringBuffer sb = new StringBuffer();
int chr, i = 0;
while ((chr = is.read()) != -1)
sb.append((char) chr);
return sb.toString();
} catch (Exception e) {
}
return null;
}
};

ReadFileText.java

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class ReadFileText
extends MIDlet {

Display display;
ReadFile read;

public ReadFileText() {
display = Display.getDisplay(this);
}

public void startApp() {
read = new ReadFile(this, display);
display.setCurrent(read);
}

public void pauseApp() {}

public void destroyApp(boolean unconditional) {
}

public void exitMIDlet() {
destroyApp(false);
notifyDestroyed();
}
};

Membuat Suara Alert

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class SoundAlert extends MIDlet implements ItemStateListener, CommandListener {
private Display display;
private Form fmMain;
private Command cmExit;
private ChoiceGroup cgSound;

public SoundAlert() {
display = Display.getDisplay(this);
cgSound = new ChoiceGroup("Choose a sound", Choice.EXCLUSIVE);
cgSound.append("Info", null);
cgSound.append("Confirmation", null);
cgSound.append("Warning", null);
cgSound.append("Alarm", null);
cgSound.append("Error", null);

cmExit = new Command("Keluar", Command.EXIT, 1);

fmMain = new Form("");
fmMain.append(cgSound);
fmMain.addCommand(cmExit);
fmMain.setCommandListener(this);
fmMain.setItemStateListener(this);
}

public void startApp()
{
display.setCurrent(fmMain);
}

public void pauseApp()
{ }
public void destroyApp(boolean unconditional)
{ }

public void commandAction(Command c, Displayable s)
{
if (c == cmExit)
{
destroyApp(false);
notifyDestroyed();
}
}
public void itemStateChanged(Item item)
{
switch (cgSound.getSelectedIndex())
{
case 0:
AlertType.INFO.playSound(display);
break;

case 1:
AlertType.CONFIRMATION.playSound(display);
break;

case 2:
AlertType.WARNING.playSound(display);
break;

case 3:
AlertType.ALARM.playSound(display);
break;

case 4:
AlertType.ERROR.playSound(display);
break;
}
}
}

Membuat Ticker

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class FirstTicker extends MIDlet implements CommandListener{
Display display;
List list;
Command cmExit;
Ticker tic;

public FirstTicker() {
display = Display.getDisplay(this);

cmExit = new Command("Keluar", Command.EXIT, 1);

tic = new Ticker("Ini adalah ticker pertamaku");

list = new List("First Ticker", List.IMPLICIT);
list.setTicker(tic);
display.setCurrent(list);
}

public void startApp() {
}

public void pauseApp() {
}

public void destroyApp(boolean unconditional) {
}

public void commandAction(Command c, Displayable s){
if(c == cmExit){
exitMIDlet();
}
}

public void exitMIDlet() {
destroyApp(false);
notifyDestroyed();
}
}

Pengurutan Data

#include
#define MAKS 20
typedef int array [7];
void pemasukan_data(float x[7], int *pjumlah);
void pengurutan_data(float x[7], int jumlah);
void penampilan_data(float x[7], int jumlah);
main()
{
float data[MAKS];
int jum_data;
pemasukan_data(data, &jum_data);
pengurutan_data(data, jum_data);
penampilan_data(data, jum_data);
}
void pemasukan_data(float x[7], int *pjumlah)
{
printf("==============================================\n");
printf("| Program Pengurutan Data Ahmad Nurdin Tsani |\n");
printf("==============================================\n");
int i, jum;

for(i=0; i<7; i++)
{
printf("Data ke-%d:", i+1);
scanf("%f", &x[i]);
}
*pjumlah=jum;
}
void pengurutan_data(float x[7], int jumlah)
{
int i, j;
float smtr;
for(i=0; i<7-1; i++)
for(j=i+1; j<7; j++)
if (x[i]>x[j])
{
/*penukaran data*/
smtr=x[i];
x[i]=x[j];
x[j]=smtr;
}
}
void penampilan_data(float x[7], int jumlah )
{
int i;
puts("\nData diatas diurutkan menjadi :\n");
for(i=0; i<7; i++)
printf("Data ke-%d : %g\n", i+1, x[i]);
}

Membuat Alert

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class FirstAlert extends MIDlet implements CommandListener{
Display display;
List list;
Image img;
Alert alAl, alCo, alEr, alIn, alWa;
Command cmExit;

public FirstAlert() {
display = Display.getDisplay(this);
try {
img = Image.createImage("/img.png");
} catch (java.io.IOException e) {
}
cmExit = new Command("Keluar", Command.EXIT, 1);
list = new List("First Alert", List.IMPLICIT);
list.append("ALARM", img);
list.append("CONFIRMATION", img);
list.append("ERROR", img);
list.append("INFO", img);
list.append("WARNING", img);
list.addCommand(cmExit);
list.setCommandListener(this);
display.setCurrent(list);

alAl = new Alert("ALARM", "Alert ALARM", null, AlertType.ALARM);
alAl.setTimeout(Alert.FOREVER);

alCo = new Alert("CONFIRMATION", "Alert CONFIRMATION", null, AlertType.CONFIRMATION);
alCo.setTimeout(Alert.FOREVER);

alEr = new Alert("ERROR", "Alert ERROR", null, AlertType.ERROR);
alEr.setTimeout(Alert.FOREVER);

alIn = new Alert("INFO", "Alert INFO", null, AlertType.INFO);
alIn.setTimeout(Alert.FOREVER);

alWa = new Alert("WARNING", "Alert WARNING", null, AlertType.WARNING);
alWa.setTimeout(Alert.FOREVER);
}

public void startApp() {
}

public void pauseApp() {
}

public void destroyApp(boolean unconditional) {
}

public void commandAction(Command c, Displayable s){
if (c == List.SELECT_COMMAND){
switch (list.getSelectedIndex()){
case 0:
display.setCurrent(alAl);
break;
case 1:
display.setCurrent(alCo, list);
break;
case 2:
display.setCurrent(alEr);
break;
case 3:
display.setCurrent(alIn, list);
break;
case 4:
display.setCurrent(alWa);
break;
}
}else if(c == cmExit){
exitMIDlet();
}
}

public void exitMIDlet() {
destroyApp(false);
notifyDestroyed();
}
}

Perkalian Matrik dengan C++

#include
void main()
{
int I,J,K,BarisA,KolomA,BarisB,KolomB;
int MatrikA[3][3],MatrikB[3][3],MatrikC[3][3];

printf("======================================================\n");
printf("| Program Perkalian 2 Buah Matrik Ahmad Nurdin Tsani |\n");
printf("======================================================\n");
printf("Jumlah Baris Matrik A : ");scanf("%d",&BarisA);
printf("Jumlah Kolom Matrik A : ");scanf("%d",&KolomA);
printf("\n");
printf("Jumlah Baris Matrik B : ");scanf("%d",&BarisB);
printf("Jumlah Kolom Matrik B : ");scanf("%d",&KolomB);
printf("\n");

printf("Masukkan Nilai Matrik A:\n");
for(I=0;Ifor(J=0;J printf("A(%3d,%3d) : ",I+1,J+1);
scanf("%d",&MatrikA[I][J]);
}
printf("\n");
}

printf("Masukkan Nilai Matrik B:\n");
for(J=0;J for(K=0;K printf("B(%3d,%3d) : ",J+1,K+1);
scanf("%d",&MatrikB[J][K]);
}
printf("\n");
}

for(I=0;I for(K=0;K MatrikC[I][K]=0;
for(J=0;J MatrikC[I][K]+=MatrikA[I][J]*MatrikB[J][K];
}
}

printf("Hasil Perkalian 2 Buah Matrik di atas adalah:\n");

for(I=0;I for(K=0;K printf("\n");
}
printf("\n");
}

Program Faktorial C++

#include
#include
int a;
char z;
int fibonacci()
{
int f1,f2,fn,n;
cout<<"Masukkan Jumlah Deret Fiboncci : ";cin>>n;
cout< f1=1;
f2=1;
fn=f1+f2;
cout< cout< for (int a=0;a {
cout< f1=f2;
f2=fn;
fn=f1+f2;

}
cout< return fn;
}
int faktorial()
{
long int n,b;
cout<<"Masukkan bilangan : ";cin>>n;
cout< b=1;
for (int a=1;a<=n;a++)
{
b=b*a;
}
cout<<"Jumlah Faktorial dari "< cout< return b;
}
void main()
{
do {
clrscr();
cout<<"======================================="< cout<<"| Menu Pilihan |"< cout<<"======================================="< cout<<"| 1. Program Fibonanci |"< cout<<"| 2. Program Faktorial |"< cout<<"======================================="< cout<<" "< cout<<"Masukkan Pilihan Anda : ";
cin>>a;
switch (a)
{
case 1 :
fibonacci();
break;

case 2 :
faktorial();
break;

default:
cout<<"Pilihlah sesuai hati nuranimu."< }
cout<<"Ketik sembarang untuk mengulang atau ketik 'n' untuk mengakhiri : ";
cin>>z;
}while (z !='n');
}

Program Fibonacci pada C++

#include
int x=1,y=1,p,i,a;
void main()
{
cout<<"Masukkan batas deret fibonacci : ";
cin>>a;
cout< cout<
for (i=0;i<=a-3;i++)
{
p=x+y;
cout< x=y;
y=p;
}
}

Luas Bidang Pada C++

#include
#include
#include
int a;
char z;
int lingkaran()
{
const float phi=22/7;
float r,luas,keliling;
cout<<"Masukkan Jari-Jari : ";
cin>>r;
luas=phi*r*r;
cout<<"Luas Lingkaran :"< keliling=2*phi*r;
cout<<"Keliling Lingkaran : "< return luas,keliling;
}
int segitiga_siku2()
{
float a,t,luas,keliling,m;
cout<<"Masukkan Panjang Alas : ";
cin>>a;
cout<<"Masukkan Panjang Tinggi : ";
cin>>t;
m=sqrt((a*a)+(t*t));
cout<<"Sisi Miring : "< luas=a*t*0.5;
cout<<"Luas Segitiga : "< keliling=a+t+m;
cout<<"Keliling Segitiga : "< return luas,keliling;
}
int persegi_panjang()
{
int p,l,luas,keliling;
cout<<"Masukkan Panjang persegi : ";
cin>>p;
cout<<"Masukkan Lebar persegi : ";
cin>>l;
luas=p*l;
cout<<"Luas Persegi Panjang : "< keliling=2*(p+l);
cout<<"Keliling Persegi Panjang : "< return luas,keliling;
}
void main()
{
do {
clrscr();
cout<<"==============================="< cout<<"| Menu Pilihan |"< cout<<"==============================="< cout<<"| 1. Segitiga Siku-Siku |"< cout<<"| 2. Lingkaran |"< cout<<"| 3. Persegi Panjang |"< cout<<"==============================="< cout<<" "< cout<<"Masukkan Pilihan Anda : ";
cin>>a;
switch (a)
{
case 1 :
segitiga_siku2();
break;

case 2 :
lingkaran();
break;

case 3 :
persegi_panjang();
break;

default:
cout<<"Pilihlah sesuai hati nuranimu.";
}
cout< cout<<"Ketik sembarang untuk mengulang atau ketik 'n' untuk mengakhiri : ";
cin>>z;
}while (z !='n');
}

Membuat Huruf Kapital

#include
#include
#include
#include
int b,c;
char a[100];
void main()
{
cout<<"Masukkan Kalimat = ";
cin.getline(a,sizeof(a));
b = strlen(a);
for (c=1;c<=b;c++)
a[c-1] = toupper(a[c-1]);
cout<<"Kalimat yang anda masukkan : " << a;
}

Animasi Bintang pada C++

#include
#include
int tinggi, baris, kolom;
char a;
void main()
{
do{
clrscr();
cout<<"Tinggi bintang : ";cin>>tinggi;
for ( baris= tinggi ; baris >= 1 ;baris-- )
{
for (kolom = baris ; kolom >= 1 ; kolom--)
cout<<'*';
cout< }
for ( baris= 1 ; baris <= tinggi-1 ;baris++ )
{
for (kolom = 0 ; kolom <= baris ; kolom++)
cout<<'*';
cout< }
cout<<"Apakah anda ingin mengulang (y/n) : ";
cin>>a;
}while (a!='n');
}

Pembalik kata pada C++

#include
#include
#include
char a[100];
int b,c;
void main()
{
cout<<"Masukkan Nama : ";
cin.getline(a,sizeof(a));
b=strlen(a);
cout<<"Nama anda :";
for(c=b;c>=1;c--)
cout<}

Konversi Nilai Dengan C++

#include
#include
int a;
char b;
void main()
{
do{
clrscr();
cout<<"========================================================="< cout<<"I Daftar Konversi Nilai Mahasiswa Universitas Trunojoyo I"< cout<<"I Produced by Ahmad Nurdin Tsani I"< cout<<"========================================================="< cout<<"I Nilai 81 - 100 = A I"< cout<<"I Nilai 76 - 80 = B+ I"< cout<<"I Nilai 71 - 75 = B I"< cout<<"I Nilai 66 - 70 = C+ I"< cout<<"I Nilai 61 - 65 = C I"< cout<<"I Nilai 56 - 60 = D+ I"< cout<<"I Nilai 50 - 55 = D I"< cout<<"I Nilai < 50 = E I"< cout<<"========================================================="< cout<<"Masukkan nilai : ";
cin>>a;
if (a>100)
cout<<"Error"< else if (a > 80)
cout<<"Nilai kamu adalah A"< else if (a>75)
cout<<"Nilai kamu adalah B+"< else if (a>70)
cout<<"Nilai kamu adalah B"< else if (a>65)
cout<<"Nilai kamu adalah C+"< else if (a>60)
cout<<"Nilai kamu adalah C"< else if (a>55)
cout<<"Nilai kamu adalah D+"< else if (a>49)
cout<<"Nilai kamu adalah D"< else if (a<50)
cout<<"Nilai kamu adalah E"< cout<<"Apakah anda ingin mengulang?(y/n):";
cin>>b;
}while (b!='n');
}

Konversi Nama Bulan Dengan C++

#include
#include
#include
int a;
char b;
void main()
{
do{
clrscr();
cout<<"=========================================================================="< cout<<"I Daftar Konversi Nilai Angka Menjadi Nilai Bulan Universitas Trunojoyo I"< cout<<"I Produced by Ahmad Nurdin Tsani I"< cout<<"=========================================================================="< cout<<"I Nilai 1 = Januari I"< cout<<"I Nilai 2 = Februari I"< cout<<"I Nilai 3 = Maret I"< cout<<"I Nilai 4 = April I"< cout<<"I Nilai 5 = Mei I"< cout<<"I Nilai 6 = Juni I"< cout<<"I Nilai 7 = Juli I"< cout<<"I Nilai 8 = Agustus I"< cout<<"I Nilai 9 = September I"< cout<<"I Nilai 10 = Oktober I"< cout<<"I Nilai 11 = Nopember I"< cout<<"I Nilai 12 = Desember I"< cout<<"=========================================================================="< cout <<"Masukkam angka bulan yang ingin dikonversi ="; cin>>a;
switch (a)
{
case 1 :
cout<< "Bulan Januari"< case 2 :
cout<<"Bulan Februari"< case 3 :
cout<< "Bulan Maret"< case 4 :
cout<< "Bulan April"< case 5 :
cout<< "Bulan Mei"< case 6 :
cout<< "Bulan Juni"< case 7 :
cout<< "Bulan Juli"< case 8 :
cout<< "Bulan Agustus"< case 9 :
cout<< "Bulan September"< case 10 :
cout<< "Bulan Oktober"< case 11 :
cout<< "Bulan November"< case 12 :
cout<< "Bulan Desember"< default:
cout<<"Bulan hanya 1-12 az..."< }
cout<<"Apakah anda ingin mengulang?(y/n):";
cin>>b;
}while (b!='n');
}

Seleksi Huruf Vokal

#include
char huruf;
void main()
{
cout<<"Masukkan huruf yang anda inginkan : " ;
cin>>huruf;
if (huruf!='a' && huruf!='i' && huruf!='u' && huruf!='e' && huruf!='o')
cout<<"Huruf "<else
cout<<"Huruf "<}

Membuat Matrik dengan C++

#include
#include
void main()
{
int A[3][3],B[3][3],X[3][3],Y[3][3],i,j,k,l;
cout<cout<<" Penjumlahan Dua Matrik 3x3"< cout<<"Matrik A"< for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{
cout<<"Masukkan elemen ["< cin>>A[i][j];
}}
cout<cout<<"Matrik B"<for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{ cout<<"Masukkan elemen ["< cin>>B[i][j];
}
}
/*Menampilkan isi matrik A*/
cout<cout<<"Matrik A"<for(i=0;i<1;i++)
{
for(j=0;j<3;j++)
cout< cout<}
for(i=1;i<2;i++)
{
for(j=0;j<3;j++)
cout< cout<}
for(i=2;i<3;i++)
{
for(j=0;j<3;j++)
cout< cout<}
cout<
cout<<"Matrik B"<for(i=0;i<1;i++)
{
for(j=0;j<3;j++)
cout< cout<}
for(i=1;i<2;i++)
{
for(j=0;j<3;j++)
cout< cout<}
for(i=2;i<3;i++)
{
for(j=0;j<3;j++)
cout< cout<}
cout<for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{
X[i][j]=A[i][j]+B[i][j];
}}
cout<<"Hasil Penjumlahan Matrik A dan B"< for(i=0;i<1;i++)
{
for(j=0;j<3;j++)
cout< }
cout< for(i=1;i<2;i++)
{
for(j=0;j<3;j++)
cout< }
cout< for(i=2;i<3;i++)
{
for(j=0;j<3;j++)
cout<}}

Program Buku Telepon dengan C++

#include
#include
#include
#include

struct buku_telepon
{
int no;
char nama[20];
char alamat[100];
char telp[10];
buku_telepon *next;
};

typedef struct buku_telepon* BUKU_TELEPON;
BUKU_TELEPON head=NULL,tail=NULL;

BUKU_TELEPON getNode()
{
BUKU_TELEPON dataBaru;
dataBaru=(BUKU_TELEPON)malloc(sizeof(buku_telepon));
strcpy(dataBaru->nama,"");
strcpy(dataBaru->alamat,"");
strcpy(dataBaru->telp,"");
dataBaru->next=NULL;
return dataBaru;
}
void tambah()
{
BUKU_TELEPON dataBaru;
dataBaru=getNode();
printf("Nama :");
fflush(stdin);
scanf("%s", dataBaru->nama);
printf("Alamat :");
fflush(stdin);
scanf("%s", dataBaru->alamat);
printf("Telp :");
fflush(stdin);
scanf("%s", dataBaru->telp);
if(head==NULL)
{
head=dataBaru;
tail=dataBaru;
}
else
{
tail->next = dataBaru;
tail=dataBaru;
}
}
void lihat()
{
BUKU_TELEPON jalan=head;
while(jalan!=NULL)
{
printf("\n\nNo : %d\n",jalan->no);
printf("Nama : %s\n",jalan->nama);
printf("Alamat : %s\n",jalan->alamat);
printf("Telepon: %s\n",jalan->telp);
jalan=jalan->next;
}
getch();
}
BUKU_TELEPON cari(int noData)
{
BUKU_TELEPON data;
data=head;
while(data!=NULL)
{
if(data->no==noData)
return data;
else
data=data->next;
}
return data;
}
BUKU_TELEPON cariData(char str[],int piihan)
{
BUKU_TELEPON cari=head;
while(cari!=NULL)
{
if (piihan==2)
{
if(strcmp(str,cari->nama)==0)
return cari;
}
else if (piihan==3)
{
if(strcmp(str,cari->alamat)==0)
return cari;
}
cari=cari->next;
}
return cari;
}
void cariRecord()
{
BUKU_TELEPON hasil;
int no;
char pilih,nm[20],alm[100];
printf("Cari Berdasarkan apa :\n");
printf("1. No\n");
printf("2. Nama\n");
printf("3. Alamat\n");
printf("pilih :");
pilih=getch();
switch(pilih)
{
case '1' :
printf("No :");
scanf("%d",&no);
hasil=cari(no);
break;
case '2' :
printf("Nama :");
scanf("%s",&nm);
hasil=cariData(nm,2);
break;
case '3' :
printf("Alamat :");
scanf("%s",&alm);
hasil=cariData(alm,3);
break;
}
if(hasil!=NULL)
{
printf("\nHasil Pencarian");
printf("\nNama : %s",hasil->nama);
printf("\nAlamat: %s",hasil->alamat);
printf("\nTelp : %s",hasil->telp);
}
else
{
printf("\nTidak ada\n");
getch();
}
getch();
}
void masukkanData(int no,char nm[],char alm[],char telp[])
{
BUKU_TELEPON DataBaru;
DataBaru=getNode();
DataBaru->no=no;
strcpy(DataBaru->nama,nm);
strcpy(DataBaru->alamat,alm);
strcpy(DataBaru->telp,telp);
if(head==NULL)
{head=DataBaru;
tail=DataBaru;
}
else
{
tail->next=DataBaru;
tail=DataBaru;
}}
void main()
{
char pilih;
do{
clrscr();
printf("\n\nProgram Buku Buku_telepon\n");
printf("1. Tambah Record\n");
printf("2. Lihat Record\n");
printf("3. Cari Record\n");
printf("4. Keluar\n");
printf("pilih :");
pilih=getche();
printf("\n");
switch (pilih)
{
case '1' :
tambah();
break;
case '2' :
lihat();
break;
case '3' :
cariRecord();
break;

}}while(pilih!='6');}

Program Perhitungan

#include
#include
#include
#include
int hasil1;
char jawab;
int pil,a,t,p,l,s1,s2,n,b,masukan;
int L_segitiga()
{
int L1;
L1=0.5*a*t;
return L1;
}
int L_pp()
{
int L2;
L2=p*l;
return L2;
}
int L_trapesium()
{
int L3;
L3=0.5*(s1+s2)*t;
return L3;
}
int faktorial()
{
int n,b;
cout<<"Masukkan jumlah faktorial : ";cin>>n;
cout<b=1;
for (int a=1;a<=n;a++)
{
b=b*a;
}
cout<cout<return b;
}
void main()
{
jawab='Y';
while(toupper(jawab)=='Y')
{
cout< {clrscr();
cout<<" pilihan menu "< cout<<"1. segitiga "< cout<<"2. persegi panjang "< cout<<"3. trapesium "< cout<<"4. faktorial "< cout<<"masukkan pilihan anda ? ";
cin>>p;
switch (p)
{
case 1 : cout<<"masukkan alas : ";cin>>a;
cout<<"masukkan tinggi : ";cin>>t;
hasil1=L_segitiga();
cout<<"luas adalah "< cout< break;
case 2 : cout<<"masukkan panjang: ";cin>>p;
cout<<"masukkan lebar: ";cin>>l;
hasil1=L_pp();
cout<<"luas adalah "< cout< break;
case 3 : cout<<"masukkan sisi pertama : ";cin>>s1;
cout<<"masukkan kedua : ";cin>>s2;
cout<<"masukkan tinggi : ";cin>>t;
hasil1=L_trapesium();
cout<<"luas adalah "< cout< break;
case 4 :faktorial();
break;
default:
cout<<"Masukan anda salah!";
}
cout< cout<<"apakah anda ingin mengulang?Y/T _";
do{
putchar('\b');
jawab=getche();
}while(!(toupper(jawab)=='Y'||toupper(jawab)=='T'));
cout< }}}

Seleksi Bilangan 2

#include
int a,b,c;
void main()
{
cin>>a;
cout<cout<}

Program Konversi

#include
#include
#include
int a;
char z;

int desimal()
{
int a,b,c;
cout<<"============================="< cout<<"| Konversi Bilangan Desimal |"< cout<<"============================="< cout<<"Masukkan bilangan desimal : ";
cin>>a;
cout< cout< return a;
}
int segitiga_siku2()
{
float a,t,luas,keliling,m;
cout<<"Masukkan Panjang Alas : ";
cin>>a;
cout<<"Masukkan Panjang Tinggi : ";
cin>>t;
m=sqrt((a*a)+(t*t));
cout<<"Sisi Miring : "< luas=a*t*0.5;
cout<<"Luas Segitiga : "< keliling=a+t+m;
cout<<"Keliling Segitiga : "< return luas,keliling;
}
int persegi_panjang()
{
int p,l,luas,keliling;
cout<<"Masukkan Panjang persegi : ";
cin>>p;
cout<<"Masukkan Lebar persegi : ";
cin>>l;
luas=p*l;
cout<<"Luas Persegi Panjang : "< keliling=2*(p+l);
cout<<"Keliling Persegi Panjang : "< return luas,keliling;
}
void main()
{
do {
clrscr();
cout<<"==============================="< cout<<"| Menu Pilihan |"< cout<<"==============================="< cout<<"| 1. Desimal |"< cout<<"| 2. Oktal |"< cout<<"| 3. Biner |"< cout<<"| 4. Heksadesimal |"< cout<<"==============================="< cout<<" "< cout<<"Masukkan Pilihan bilangan awal : ";
cin>>a;
switch (a)
{
case 1 :
desimal();
break;



default:
cout<<"Pilihlah sesuai hati nuranimu.";
}
cout< cout<<"Ketik sembarang untuk mengulang atau ketik 'n' untuk mengakhiri : ";
cin>>z;
}while (z !='n');
}

Deret Aritmatika 2

#include
#include
int a,b,c=1,d;
char e;
void main()
{
do{
clrscr();
cout<<"==========================="< cout<<" Menu pilihan"< cout<<"==========================="< cout<<"1. Deret Un=Un-1 + 3"< cout<<"2. Deret Un=Un-1 - 3"< cout<<"==========================="< cout<<"Masukkan Pilihan anda : ";
cin>>d;
switch(d)
{
case 1 :
{
cout<<"Masukkan suku awal : ";
cin>>a;
cout<<"Masukkan jumlah suku : ";
cin>>b;
for(c;c<=b;c++)
{
cout<<"Deret ke-"< a=a+3;
}
}break;
case 2 :
{
cout<<"Masukkan suku awal : ";
cin>>a;
cout<<"Masukkan jumlah suku : ";
cin>>b;
for(c;c<=b;c++)
{
cout<<"Deret ke-"< a=a-3;
}
}break;
default:
cout<<"Anda Tidak Membaca Pilihan Ya..."< }
cout<<"Apakah anda ingin mengulang?(y/n):";
cin>>e;
}while (e!='n'&& e!='N');
}

Deret Aritmatika

#include
int a=3,b,c=1;
void main()
{
cout<<"Masukkan jumlah suku : ";
cin>>b;
for(c;c<=b;c++)
{
cout<<"Deret ke-"< a=a+5;
}
}

Bilangan Biner

#include
#include
#include
#include
int a,b,c,d,e,f;
char z;
void main()
{
do{
clrscr();
cin>>a;
for(b=a;b>=0;b--)
{
c=a % 2;
a=a/2;
cout<}
cout<cout<<"Apakah anda ingin mengulang (y/n) : ";
cin>>z;
}while (z!='n');
}

Seleksi Bilangan

#include
int a;
void main()
{
cout<<"Masukkan Bilangan yang anda inginkan:" ;
cin>>a;
if (a%2)
cout<<"bilangan ganjil";
else
cout<<"bilangan genap";
}

Animasi Bola

Dim x, y As Integer
Private Sub Form_Load()
Form1.ScaleWidth = 400
Form1.ScaleHeight = 100
x = 10: y = 10
Shape1.Top = y
Shape1.Left = x
Timer1.Enabled = True
End Sub
Private Sub Form_Unload(Cancel As Integer)
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
x = x + 5: If x > 350 Then x = 1
Shape1.Top = y
Shape1.Left = x
Shape1.Refresh
End Sub

Memainkan Video

PlayVideo.java

import java.util.Hashtable;
import java.util.Enumeration;

import javax.microedition.lcdui.Item;
import javax.microedition.lcdui.List;
import javax.microedition.lcdui.Form;
import javax.microedition.midlet.MIDlet;
import javax.microedition.lcdui.Display;
import javax.microedition.lcdui.Command;
import javax.microedition.lcdui.Displayable;
import javax.microedition.lcdui.CommandListener;

import javax.microedition.media.Player;
import javax.microedition.media.Control;
import javax.microedition.media.Manager;
import javax.microedition.media.PlayerListener;
import javax.microedition.media.control.VideoControl;

public class PlayVideo extends MIDlet
implements CommandListener, PlayerListener {

private Display display;
private List itemList;
private Form form;

private Command stopCommand;
private Command pauseCommand;
private Command startCommand;

private Hashtable items;
private Hashtable itemsInfo;

private Player player;

public PlayVideo() {

display = Display.getDisplay(this);

itemList = new List("Video", List.IMPLICIT);

stopCommand = new Command("Stop", Command.STOP, 1);
pauseCommand = new Command("Pause", Command.ITEM, 1);
startCommand = new Command("Mulai", Command.ITEM, 1);

form = new Form("Play Video");

form.addCommand(stopCommand);
form.addCommand(pauseCommand);
form.setCommandListener(this);

items = new Hashtable();

itemsInfo = new Hashtable();

items.put("video.mpeg", "file://video.mpeg");
itemsInfo.put("video.mpeg", "video/mpeg");
}

public void startApp() {

for(Enumeration en = items.keys(); en.hasMoreElements();) {
itemList.append((String)en.nextElement(), null);
}

itemList.setCommandListener(this);

display.setCurrent(itemList);
}

public void pauseApp() {
try {
if(player != null) player.stop();
} catch(Exception e) {}
}

public void destroyApp(boolean unconditional) {
if(player != null) player.close();
}

public void commandAction(Command command, Displayable disp) {
if(disp instanceof List) {
List list = ((List)disp);

String key = list.getString(list.getSelectedIndex());

try {
playMedia((String)items.get(key), key);
} catch (Exception e) {
}
} else if(disp instanceof Form) {
try {

if(command == stopCommand) {

player.close();
display.setCurrent(itemList);
form.removeCommand(startCommand);
form.addCommand(pauseCommand);

} else if(command == pauseCommand) {

player.stop();
form.removeCommand(pauseCommand);
form.addCommand(startCommand);
} else if(command == startCommand) {

player.start();
form.removeCommand(startCommand);
form.addCommand(pauseCommand);
}
} catch(Exception e) {
}
}

}

private void playMedia(String locator, String key) throws Exception {

String file = locator.substring(
locator.indexOf("file://") + 6,
locator.length());

player =
Manager.createPlayer(
getClass().getResourceAsStream(file), (String)itemsInfo.get(key));

player.addPlayerListener(this);

player.setLoopCount(-1);
player.prefetch();
player.realize();

player.start();

}

public void playerUpdate(Player player, String event, Object eventData) {

if(event.equals(PlayerListener.STARTED) &&
new Long(0L).equals((Long)eventData)) {

VideoControl vc = null;
if((vc = (VideoControl)player.getControl("VideoControl")) != null) {
Item videoDisp =
(Item)vc.initDisplayMode(vc.USE_GUI_PRIMITIVE, null);
form.append(videoDisp);
}

display.setCurrent(form);
} else if(event.equals(PlayerListener.CLOSED)) {

form.deleteAll();
}
}

}

Memainkan Tone

ToneCanvas.java

import javax.microedition.lcdui.*;
import javax.microedition.media.*;
import javax.microedition.media.control.*;


class ToneCanvas extends Canvas implements CommandListener {
private Command cmExit;
private String keyText = null;
private static final int minNote = 0;
private static final int maxNote = 127;
private int note = ToneControl.C4;
private PlayTone midlet;
private Display display;
private String[] tone = new String[]{"C","C#","D","D#","E","F","F#","G","G#","A","A#","B"};
private int index = 0;

public ToneCanvas(PlayTone midlet, Display display){
this.midlet = midlet;
this.display = display;
cmExit = new Command("Exit", Command.EXIT, 1);
addCommand(cmExit);
setCommandListener(this);
}

protected void paint(Graphics g){
g.setColor(255, 255, 255);
g.fillRect(0, 0, getWidth(), getHeight());
g.setColor(0, 0, 0);
g.drawString("Note : " + tone[index] + " Value : " + Integer.toString(note), getWidth()/2, getHeight()/2, Graphics.TOP
| Graphics.HCENTER);
}

public void commandAction(Command c, Displayable d){
if (c == cmExit)
midlet.exitMIDlet();
}

protected void keyPressed(int keyCode){
switch (keyCode){
case -5:
note = ToneControl.C4;
break;
case -4:
if (note != maxNote){
note++;
if(index < (tone.length - 1)){
index++;
}else{
index = 0;
}
}
break;
case -3:
if (note != minNote){
note--;
if(index > 0){
index--;
}else{
index = tone.length - 1;
}
}
break;
case 49:
note = 60;
index = 0;
break;
case 50:
note = 62;
index = 2;
break;
case 51:
note = 64;
index = 4;
break;
case 52:
note = 65;
index = 5;
break;
case 53:
note = 67;
index = 7;
break;
case 54:
note = 69;
index = 9;
break;
case 55:
note = 71;
index = 11;
break;
default :
break;
}
playNote();
repaint();
}

private void playNote(){
try {
Manager.playTone(note, 300, 100);
}catch (Exception e){
Alert alr = new Alert("Error", "Tone tidak dapat dimainkan", null, AlertType.ERROR);
alr.setTimeout(Alert.FOREVER);
display.setCurrent(alr, this);
}
}
}

PlayTone.java

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class PlayTone
extends MIDlet{

private Display display;
private ToneCanvas canvas;

public PlayTone() {
display = Display.getDisplay(this);
}


public void startApp() {
canvas = new ToneCanvas(this, display);
display.setCurrent(canvas);
}

public void pauseApp() {}

public void destroyApp(boolean unconditional) {
}

public void exitMIDlet() {
destroyApp(false);
notifyDestroyed();
}
}

Memainkan lagu

PlaySong.java

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class PlaySong
extends MIDlet{

private Display display;
private SongCanvas canvas;

public PlaySong() {
display = Display.getDisplay(this);
}


public void startApp() {
canvas = new SongCanvas(this, display);
display.setCurrent(canvas);
}

public void pauseApp() {}

public void destroyApp(boolean unconditional) {
}

public void exitMIDlet() {
destroyApp(false);
notifyDestroyed();
}
}

SongCanvas.java

import javax.microedition.lcdui.*;
import javax.microedition.media.*;
import javax.microedition.media.control.*;


class SongCanvas extends Canvas implements CommandListener, PlayerListener {
private Command cmExit;
private PlaySong midlet;
private Display display;
private static Player player;
private VolumeControl vc;
byte quarterNote = 16;
byte halfNote = 32;
byte startingNote = (byte) ToneControl.C4;
byte G = (byte) (startingNote - 5);
byte A = (byte) (startingNote - 3);
byte B = (byte) (startingNote - 1);
byte C1 = (byte) (startingNote);
byte D1 = (byte) (startingNote + 2);
byte E1 = (byte) (startingNote + 4);
byte F1 = (byte) (startingNote + 5);
byte G1 = (byte) (startingNote + 7);
byte A1 = (byte) (startingNote + 9);
byte B1 = (byte) (startingNote + 10);
byte C2 = (byte) (startingNote + 11);
byte D2 = (byte) (startingNote + 13);
byte E2 = (byte) (startingNote + 15);
byte F2 = (byte) (startingNote + 16);

public SongCanvas(PlaySong midlet, Display display){
this.midlet = midlet;
this.display = display;
cmExit = new Command("Keluar", Command.EXIT, 1);
addCommand(cmExit);
setCommandListener(this);
playSong();
}

protected void paint(Graphics g){
g.setColor(255, 255, 255);
g.fillRect(0, 0, getWidth(), getHeight());
g.setColor(0, 0, 0);
g.drawString("Memainkan lagu", getWidth()/2, getHeight()/2, Graphics.TOP
| Graphics.HCENTER);
}

public void commandAction(Command c, Displayable d){
if (c == cmExit)
midlet.exitMIDlet();
}

private void playSong(){
byte[] sequence = new byte[] {
ToneControl.VERSION, 1,
ToneControl.TEMPO, 30,
ToneControl.BLOCK_START, 0,
G, quarterNote,
G, quarterNote,
D1, quarterNote,
D1, quarterNote,
E1, quarterNote,
E1, quarterNote,
D1, halfNote,
ToneControl.BLOCK_END, 0,
ToneControl.BLOCK_START, 1,
C1, quarterNote,
C1, quarterNote,
B, quarterNote,
B, quarterNote,
A, quarterNote,
A, quarterNote,
G, halfNote,
ToneControl.BLOCK_END, 1,
ToneControl.BLOCK_START, 2,
D1, quarterNote,
D1, quarterNote,
C1, quarterNote,
C1, quarterNote,
B, quarterNote,
B, quarterNote,
A, halfNote,
ToneControl.BLOCK_END, 2,
ToneControl.PLAY_BLOCK, 0,
ToneControl.PLAY_BLOCK, 1,
ToneControl.PLAY_BLOCK, 2,
ToneControl.PLAY_BLOCK, 2,
ToneControl.PLAY_BLOCK, 0,
ToneControl.PLAY_BLOCK, 1
};
try {
player = Manager.createPlayer(Manager.TONE_DEVICE_LOCATOR);
player.realize();
ToneControl tc = (ToneControl)player.getControl("ToneControl");
tc.setSequence(sequence);
player.start();
}catch (Exception e){
Alert alr = new Alert("Error", "Lagu tidak dapat dimainkan", null, AlertType.ERROR);
alr.setTimeout(Alert.FOREVER);
display.setCurrent(alr, this);
}
}

public void playerUpdate(Player player, String event, Object eventData) {
if(event.equals(PlayerListener.STARTED) &&
new Long(0L).equals((Long)eventData)) {
} else if(event.equals(PlayerListener.CLOSED)) {
}
}
}

Memainkan musik

import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;
import javax.microedition.media.*;
import javax.microedition.media.control.*;

public class PlayMusic
extends MIDlet
implements PlayerListener, CommandListener {

private Display display;
private static Player player;
private VolumeControl vc;
private List list;
private Command cmExit, cmStop;


public PlayMusic() {
display = Display.getDisplay(this);
}


public void startApp() {
cmExit = new Command("Keluar", Command.EXIT, 1);
cmStop = new Command("Stop", Command.OK, 1);
list = new List("Menu", List.IMPLICIT);
list.append("dik", null);
list.append("matta", null);
list.append("Emang Dasar", null);
list.append("midi", null);
list.addCommand(cmExit);
list.setCommandListener(this);
display.setCurrent(list);
}

public void pauseApp() {}

public void destroyApp(boolean unconditional) {
if(player != null){
player.close();
}
}

public void commandAction(Command c, Displayable s){
if (c == List.SELECT_COMMAND){
switch (list.getSelectedIndex()){
case 0:
list.addCommand(cmStop);
try {
playMedia("dik.wav", "wav");
} catch (Exception e) {
e.printStackTrace();
}
break;
case 1:
list.addCommand(cmStop);
try {
playMedia("matta.wav", "wav");
} catch (Exception e) {
e.printStackTrace();
}
break;
case 2:
list.addCommand(cmStop);
try {
playMedia("emangdasar.wav", "wav");
} catch (Exception e) {
e.printStackTrace();
}
break;
case 3:
list.addCommand(cmStop);
try {
playMedia("mid.mid", "mid");
} catch (Exception e) {
e.printStackTrace();
}
break;
}
}else if(c == cmExit){
exitMIDlet();
}else if(c == cmStop){
try{
player.stop();
if(player != null){
player.close();
}
}catch(Exception e){
}
list.removeCommand(cmStop);
}
}

public void exitMIDlet() {
destroyApp(false);
notifyDestroyed();
player = null;
}

private void playMedia(String file, String p)
throws Exception {
if(p.equals("wav")){
player = Manager.createPlayer(getClass().getResourceAsStream(file), "audio/x-wav");
}else if(p.equals("mid")){
player = Manager.createPlayer(getClass().getResourceAsStream(file), "audio/midi");

}

player.addPlayerListener(this);

player.setLoopCount(-1);
player.prefetch();
player.realize();

vc = (VolumeControl)player.getControl("VolumeControl");
if (vc != null)
vc.setLevel(100);


player.start();
}

public void playerUpdate(Player player, String event, Object eventData) {
if(event.equals(PlayerListener.STARTED) &&
new Long(0L).equals((Long)eventData)) {
} else if(event.equals(PlayerListener.CLOSED)) {
}
}
}

AnimationMIDlet

import java.util.Timer;
import java.util.TimerTask;
import javax.microedition.lcdui.Canvas;
import javax.microedition.lcdui.Command;
import javax.microedition.lcdui.CommandListener;
import javax.microedition.lcdui.Display;
import javax.microedition.lcdui.Displayable;
import javax.microedition.lcdui.Form;
import javax.microedition.lcdui.Gauge;
import javax.microedition.lcdui.Graphics;
import javax.microedition.lcdui.Item;
import javax.microedition.lcdui.ItemStateListener;
import javax.microedition.midlet.MIDlet;

public class AnimationMIDlet extends MIDlet
implements CommandListener, ItemStateListener {

// The MIDlet's Display object
private Display display;

// Flag indicating first call of startApp
protected boolean started;

// Exit command
private Command exitCommand;

// Setup command
private Command setupCommand;

// Run command
private Command runCommand;

// Configuration form
private Form form;

// Animation canvas
private AnimationCanvas canvas;

// Gauge for block count
private Gauge blockGauge;

// Gauge for frame rate
private Gauge rateGauge;

// Initial frame rate
private static final int FRAME_RATE = 1;

// Initial number of blocks
private static final int BLOCK_COUNT = 1;

protected void startApp() {
if (!started) {
display = Display.getDisplay(this);
form = new Form("Animation");
rateGauge = new Gauge("Frame rate", true, 10, FRAME_RATE);
blockGauge = new Gauge("Blocks", true, 4, BLOCK_COUNT);
form.append(rateGauge);
form.append(blockGauge);
form.setItemStateListener(this);

canvas = createAnimationCanvas();

exitCommand = new Command("Exit", Command.EXIT, 0);
setupCommand = new Command("Setup", Command.SCREEN, 0);
runCommand = new Command("Run", Command.SCREEN, 0);

canvas.addCommand(exitCommand);
canvas.addCommand(setupCommand);
form.addCommand(exitCommand);
form.addCommand(runCommand);

form.setCommandListener(this);
canvas.setCommandListener(this);

display.setCurrent(form);
started = true;
}
}

protected void pauseApp() {
}

protected void destroyApp(boolean unconditional) {
}

public void commandAction(Command c, Displayable d) {
if (c == exitCommand) {
// Exit. No need to call destroyApp
// because it is empty.
notifyDestroyed();
} else if (c == runCommand) {
display.setCurrent(canvas);
} else if (c == setupCommand) {
display.setCurrent(form);
}
}

public void itemStateChanged(Item item) {
if (item == blockGauge) {
int count = blockGauge.getValue();
if (count < 1) {
count = 1;
}
canvas.setBlockCount(count);
} else if (item == rateGauge) {
int count = rateGauge.getValue();
if (count < 1) {
count = 1;
}
canvas.setFrameRate(count);
}
}
// Creates the canvas that will draw the block
protected AnimationCanvas createAnimationCanvas() {
return new AnimationCanvas();
}

class AnimationCanvas extends Canvas {

// Size of each block
protected static final int SIZE = 4;

// Initial speeds in the X direction
protected final int[] xSpeeds = { 2, -2, 0, -2 };

// Initial speeds in the Y direction
protected final int[] ySpeeds = { 2, -2, 2, -0 };

// Background color
protected int background = display.isColor() ? 0 : 0xc0c0c0;

// Foreground color
protected int foreground = display.isColor() ? 0xffff00 : 0;

// Width of screen
protected int width = getWidth();

// Height of screen
protected int height = getHeight();

// The screen update rate
protected int frameRate;

// The blocks to draw on the screen
protected Block[] blocks;

// The update timer
protected Timer timer;

// The update timer task
protected TimerTask updateTask;

// Gets the maximum number of blocks
public int getMaxBlocks() {
return blocks.length;
}

// Constructs a canvas with default settings
AnimationCanvas() {
setBlockCount(BLOCK_COUNT);
setFrameRate(FRAME_RATE);
}

// Sets the number of blocks to draw
public void setBlockCount(int count) {
if (count > xSpeeds.length) {
throw new IllegalArgumentException("Cannot have more than "
+ xSpeeds.length + " blocks");
}

blocks = new Block[count];
createBlocks();
}

// Gets the number of blocks to draw
public int getBlockCount() {
return blocks.length;
}

// Sets the number of updates per second
public void setFrameRate(int frameRate) {
if (frameRate < 1 || frameRate > 10) {
throw new IllegalArgumentException("Frame rate must be > 0 and <= 10");
}
this.frameRate = frameRate;
if (isShown()) {
startFrameTimer();
}
}

// Gets the number of updates per second
public int getFrameRate() {
return frameRate;
}

// Paint canvas background and all
// of the blocks in their correct locations.
protected void paint(Graphics g) {
// Paint with the background color
g.setColor(background);
g.fillRect(0, 0, width, height);

// Draw all of the blocks
g.setColor(foreground);
synchronized (this) {
for (int i = 0, count = blocks.length; i < count; i++) {
g.fillRect(blocks[i].x, blocks[i].y, SIZE, SIZE);
}
}
}

// Notification that the canvas has been made visible
protected void showNotify() {
// Start the frame timer running
startFrameTimer();
}

// Notification that the canvas is no longer visible
protected void hideNotify() {
// Stop the frame timer
stopFrameTimer();
}

// Creates the blocks to be displayed
private void createBlocks() {
int startX = (width - SIZE)/2;
int startY = (height - SIZE)/2;
for (int i = 0, count = blocks.length; i < count; i++) {
blocks[i] = new Block(startX, startY, xSpeeds[i], ySpeeds[i]);
}
}

// Starts the frame redraw timer
protected void startFrameTimer() {
timer = new Timer();

updateTask = new TimerTask() {
public void run() {
moveAllBlocks();
}
};
long interval = 1000/frameRate;
timer.schedule(updateTask, interval, interval);
}

// Stops the frame redraw timer
protected void stopFrameTimer() {
timer.cancel();
}

// Called on expiry of timer.
public synchronized void moveAllBlocks() {
// Update the positions and speeds
// of all of the blocks
for (int i = 0, count = blocks.length; i < count; i++) {
blocks[i].move();

// Request a repaint of the screen
repaint();
}
}

// Inner class used to represent a block on the screen
class Block {
int x; // X position
int y; // Y position
int xSpeed; // Speed in the X direction
int ySpeed; // Speed in the Y direction

Block(int x, int y, int xSpeed, int ySpeed) {
this.x = x;
this.y = y;
this.xSpeed = xSpeed;
this.ySpeed = ySpeed;
}

void move() {
x += xSpeed;
if (x <= 0 || x + SIZE >= width) {
xSpeed = -xSpeed;
}

y += ySpeed;
if (y <= 0 || y + SIZE >= height) {
ySpeed = -ySpeed;
}
}
}
}
}

Animasi Form pada VB

Buat module dengan kode di bawah ini

#If Win16 Then
Type RECT
Left As Integer
Top As Integer
Right As Integer
Bottom As Integer
End Type
#Else
Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
#End If

#If Win16 Then
Declare Sub GetWindowRect Lib "User" (ByVal hwnd As Integer, lpRect As RECT)
Declare Function GetDC Lib "User" (ByVal hwnd As Integer) As Integer
Declare Function ReleaseDC Lib "User" (ByVal hwnd As Integer, ByVal hdc As Integer) As Integer
Declare Sub SetBkColor Lib "GDI" (ByVal hdc As Integer, ByVal crColor As Long)
Declare Sub Rectangle Lib "GDI" (ByVal hdc As Integer, ByVal X1 As Integer, ByVal Y1 As Integer, ByVal X2 As Integer, ByVal Y2 As Integer)
Declare Function CreateSolidBrush Lib "GDI" (ByVal crColor As Long) As Integer
Declare Function SelectObject Lib "GDI" (ByVal hdc As Integer, ByVal hObject As Integer) As Integer
Declare Sub DeleteObject Lib "GDI" (ByVal hObject As Integer)
#Else
Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long
Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal hdc As Long) As Long
Declare Function SetBkColor Lib "gdi32" (ByVal hdc As Long, ByVal crColor As Long) As Long
Declare Function Rectangle Lib "gdi32" (ByVal hdc As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Declare Function CreateSolidBrush Lib "gdi32" (ByVal crColor As Long) As Long
Declare Function SelectObject Lib "user32" (ByVal hdc As Long, ByVal hObject As Long) As Long
Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
#End If

Sub ExplodeForm(f As Form, Movement As Integer)
Dim myRect As RECT
Dim formWidth%, formHeight%, i%, X%, Y%, Cx%, Cy%
Dim TheScreen As Long
Dim Brush As Long
GetWindowRect f.hwnd, myRect
formWidth = (myRect.Right - myRect.Left)
formHeight = myRect.Bottom - myRect.Top
TheScreen = GetDC(0)
Brush = CreateSolidBrush(f.BackColor)
For i = 1 To Movement
Cx = formWidth * (i / Movement)
Cy = formHeight * (i / Movement)
X = myRect.Left + (formWidth - Cx) / 2
Y = myRect.Top + (formHeight - Cy) / 2
Rectangle TheScreen, X, Y, X + Cx, Y + Cy
Next i
X = ReleaseDC(0, TheScreen)
DeleteObject (Brush)
End Sub

Public Sub ImplodeForm(f As Form, Movement As Integer)
Dim myRect As RECT
Dim formWidth%, formHeight%, i%, X%, Y%, Cx%, Cy%
Dim TheScreen As Long
Dim Brush As Long
GetWindowRect f.hwnd, myRect
formWidth = (myRect.Right - myRect.Left)
formHeight = myRect.Bottom - myRect.Top
TheScreen = GetDC(0)
Brush = CreateSolidBrush(f.BackColor)
For i = Movement To 1 Step -1
Cx = formWidth * (i / Movement)
Cy = formHeight * (i / Movement)
X = myRect.Left + (formWidth - Cx) / 2
Y = myRect.Top + (formHeight - Cy) / 2
Rectangle TheScreen, X, Y, X + Cx, Y + Cy
Next i
X = ReleaseDC(0, TheScreen)
DeleteObject (Brush)
End Sub

Kode form load
Private Sub Form_Load()
Call ExplodeForm(Me, 10000)
End Sub

Luas Lingkaran dengan C++

#include
#define phi 22/7
int r;
float l;
void main()
{
cout<<"masukkan jari-jari lingkaran ";
cin>>r;
l=r*r*phi;
cout<<"luas lingkaran dengan jari-jari "< cout<}

Program Keliling lingkaran dengan C++

#include
#define phi 3.14
float r;
float k;
void main()
{
cout<<"masukkan jari-jari lingkaran: ";
cin>>r;
k = 2*phi*r;
cout<<"keliling lingkaran dengan jari-jari "< cout<}

Program C++ Data Mahasiswa

#include
char nama,alamat,nrp,jurusan;
void main()
{
cout<<"Nama Mahasiswa : ";
cin>>nama;
cout<<"Alamat : ";
cin>>alamat;
cout<<"NRP : ";
cin>>nrp;
cout<<"Jurusan : ";
cin>>jurusan;
cout<<"Nama : " < cout<<"Alamat : " < cout<<"NRP : " < cout<<"Jurusan : " <}

Membuat website dengan JavaScript

Untuk mengembangkan dan mempercantik homepage, ternyata tidak hanya dengan
menambahkan gambar-gambar yang bagus, atau GIF yang dapat bergerak, tetapi dapat juga
kita menggunakan JavaScript. JavaScript adalah bahasa pemrograman sederhana untuk
pengembangan aplikasi Internet. Bagaimanakah cara menggunakannya?
Tidak seperti bahasa Java induknya atau Applet Java yang harus dikompilasi dulu di
server sebelum dieksekusi di browser, JavaScript bisa langsung dieksekusi oleh browser.
Dengan menggunakan JavaScript maka tidak memerlukan server untuk kompilasi. File
homepage kita (*.htm atau *.html) dapat langsung dieksekusi oleh browser.
Tidak semua Browser dapat menampilkan hasil dari JavaScript. Browser-browser
yang dapat menampakkan JavaScript adalah Netscape Navigator 2.0, Mozilla Fire Fox 2.0
dan Internet Explorer 3.0 atau versi-versi yang lebih baru lagi. Tetapi mungkin saja dengan
versi yang berbeda JavaScipt bisa jalan di salah satu versi tetapi tidak pada versi laiinya.
Begitu juga ada perbedaan bila JavaScript dijalankan pada browser yang berbeda. Hal tersebut
disebabkan karena adanya perbedaan plug-in yang dimasukkan ke dalam browser-browser
tersebut.
Alamat download untuk Netscape Navigator adalah http://www.netscape.com/, dan
untuk Internet Explorer adalah http://www.microsoft.com. Berikut ini adalah contoh-contoh
homepage dalam bentuk HTML yang memanfaatkan kehebatan JavaScript yang dikompilasi
di browser Internet Explorer 7.0.



Membuat website untuk menentukan Hari Tanggal Lahir
Berikut ini adalah contoh file HTML yang bisa digunakan untuk menetukan hari tanggal lahir.

function MakeArray(n) {
this.length = n;
for (var i = 1; i <=n; i++) {
this[i] = 0;
}
}
days = new MakeArray(7);
days[0] = "Sabtu"
days[1] = "Minggu"
days[2] = "Senin"
days[3] = "Selasa"
days[4] = "Rabu"
days[5] = "Kamis"
days[6] = "Jumat"
months = new MakeArray(12);
months[1] = "Januari"
months[2] = "Februari"
months[3] = "Maret"
months[4] = "April"
months[5] = "Mei"
months[6] = "Juni"
months[7] = "Juli"
months[8] = "Agustus"
months[9] = "September"
months[10] = "Oktober"
months[11] = "November"
months[12] = "Desember"
function compute(form) {
var val1 = parseInt(form.day.value, 10)
if ((val1 < 0) || (val1 > 31)) {
alert("Tanggal di luar jangkauan")
}
var val2 = parseInt(form.month.value, 10)
if ((val2 < 0) || (val2 > 12)) {
alert("Bulan di luar jangkauan")
}
var val2x = parseInt(form.month.value, 10)
var val3 = parseInt(form.year.value, 10)
if (val3 < 1900) {
alert("Kamu tua banget!!")
}
if (val2 == 1) {
val2x = 13;
val3 = val3-1
}
if (val2 == 2) {
val2x = 14;
val3 = val3-1
}
var val4 = parseInt(((val2x+1)*3)/5, 10)
var val5 = parseInt(val3/4, 10)
var val6 = parseInt(val3/100, 10)
var val7 = parseInt(val3/400, 10)
var val8 = val1+(val2x*2)+val4+val3+val5-val6+val7+2
var val9 = parseInt(val8/7, 10)
var val0 = val8-(val9*7)
form.result1.value = form.day.value+" "+months[val2]+" "+form.year.value;
form.result2.value = days[val0];
}

Kamu lahir pada hari:


function GoBack() {
if (confirm("Yakin mau kembali ke halaman sebelumnya?")) {
history.back()
}
}

DASAR PEMOGRAMAN C++ BAGIAN 3

Membuat program penjumlahan matrik 3x3 dengan data dari matrik adalah masukan
dari user.
#include
#include
void main()
{
int A[3][3],B[3][3],X[3][3],Y[3][3],i,j,k,l;
cout<cout<<"==================================="<cout<<"| Program Ahmad Nurdin Tsani |"<cout<<"==================================="<cout<<"Program Penjumlahan Dua Matrik 3x3"<cout<<"Matrik A"<for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{
cout<<"Masukkan elemen ["<cin>>A[i][j];
}}
cout<cout<<"Matrik B"<for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{ cout<<"Masukkan elemen ["<cin>>B[i][j];
}
}
/*Menampilkan isi matrik A*/
cout<cout<<"Matrik A"<for(i=0;i<1;i++)
{
for(j=0;j<3;j++)
cout<cout<}
for(i=1;i<2;i++)
{
for(j=0;j<3;j++)
cout<cout<}
for(i=2;i<3;i++)
{
for(j=0;j<3;j++)
cout<cout<}
cout<cout<<"Matrik B"<for(i=0;i<1;i++)
{
for(j=0;j<3;j++)
cout<cout<}
for(i=1;i<2;i++)
{
for(j=0;j<3;j++)
cout<cout<}
for(i=2;i<3;i++)
{
for(j=0;j<3;j++)
cout<cout<}
cout<for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{
X[i][j]=A[i][j]+B[i][j];
}}
cout<<"Hasil Penjumlahan Matrik A dan B"<for(i=0;i<1;i++)
{
for(j=0;j<3;j++)
cout<}
cout<for(i=1;i<2;i++)
{
for(j=0;j<3;j++)
cout<}
cout<for(i=2;i<3;i++)
{
for(j=0;j<3;j++)
cout<}}

DASAR PEMOGRAMAN C++ BAGIAN 2

Membuat program buku telepon dengan data max 20 data. Fasilitas buat user adalah
tambah data, lihat data, searching berdasarkan nama fix.
#include
#include
#include
#include
struct buku_telepon
{
int no;
char nama[20];
char alamat[100];
char telp[10];
buku_telepon *next;
};
typedef struct buku_telepon* BUKU_TELEPON;
BUKU_TELEPON head=NULL,tail=NULL;
BUKU_TELEPON getNode()
{
BUKU_TELEPON dataBaru;
dataBaru=(BUKU_TELEPON)malloc(sizeof(buku_telepon));
strcpy(dataBaru->nama,"");
strcpy(dataBaru->alamat,"");
strcpy(dataBaru->telp,"");
dataBaru->next=NULL;
return dataBaru;
}
void tambah()
{
BUKU_TELEPON dataBaru;
dataBaru=getNode();
printf("Nama :");
fflush(stdin);
scanf("%s", dataBaru->nama);
printf("Alamat :");
fflush(stdin);
scanf("%s", dataBaru->alamat);
printf("Telepon:");
fflush(stdin);
scanf("%s", dataBaru->telp);
if(head==NULL)
{
head=dataBaru;
tail=dataBaru;
}
else
{
tail->next = dataBaru;
tail=dataBaru;
}
}
void lihat()
{
BUKU_TELEPON jalan=head;
while(jalan!=NULL)
{
printf("\n\nNo : %d\n",jalan->no);
printf("Nama : %s\n",jalan->nama);
printf("Alamat : %s\n",jalan->alamat);
printf("Telepon: %s\n",jalan->telp);
jalan=jalan->next;
}
getch();
}
BUKU_TELEPON cari(int noData)
{
BUKU_TELEPON data;
data=head;
while(data!=NULL)
{
if(data->no==noData)
return data;
else
data=data->next;
}
return data;
}
BUKU_TELEPON cariData(char str[],int piihan)
{
BUKU_TELEPON cari=head;
while(cari!=NULL)
{
if (piihan==2)
{
if(strcmp(str,cari->nama)==0)
return cari;
}
else if (piihan==3)
{
if(strcmp(str,cari->alamat)==0)
return cari;
}
cari=cari->next;
}
return cari;
}
void cariRecord()
{
BUKU_TELEPON hasil;
int no;
char pilih,nm[20],alm[100];
printf("Cari Berdasarkan :\n");
printf("1. Nomor urut\n");
printf("2. Nama\n");
printf("3. Alamat\n");
printf("Pilih Cara pencarian : ");
pilih=getch();
switch(pilih)
{
case '1' :
printf("Nomor :");
scanf("%d",&no);
hasil=cari(no);
break;
case '2' :
printf("Nama :");
scanf("%s",&nm);
hasil=cariData(nm,2);
break;
case '3' :
printf("Alamat :");
scanf("%s",&alm);
hasil=cariData(alm,3);
break;
}
if(hasil!=NULL)
{
printf("\nHasil Pencarian");
printf("\nNama : %s",hasil->nama);
printf("\nAlamat: %s",hasil->alamat);
printf("\nTelepon : %s",hasil->telp);
}
else
{
printf("\nData yang anda cari Tidak ada\n");
getch();
}
getch();
}
void masukkanData(int no,char nm[],char alm[],char telp[])
{
BUKU_TELEPON DataBaru;
DataBaru=getNode();
DataBaru->no=no;
strcpy(DataBaru->nama,nm);
strcpy(DataBaru->alamat,alm);
strcpy(DataBaru->telp,telp);
if(head==NULL)
{head=DataBaru;
tail=DataBaru;
}
else
{
tail->next=DataBaru;
tail=DataBaru;
}}
void main()
{
char pilih;
do{
clrscr();
printf("========================\n");
printf("| Ahmad Nurdin Tsani |\n");
printf("========================\n");
printf("\nProgram Buku telepon\n");
printf("1. Tambah Record\n");
printf("2. Lihat Record\n");
printf("3. Cari Record\n");
printf("4. Keluar\n");
printf("Pilih Program yang anda inginkan : ");
pilih=getche();
printf("\n");
switch (pilih)
{
case '1' :
tambah();
break;
case '2' :
lihat();
break;
case '3' :
cariRecord();
break;
}}while(pilih!='6');}

DASAR PEMOGRAMAN C++ BAGIAN 1

Membuat program menu pilihan menghitung :
1. luas segitiga
2. luas persegi panjang
3. luas trapesium
4. faktorial
Variabel yang dibutuhkan merupakan inputan. Pembuatan program menggunakan
fungsi. Ada pilihan untuk mengulang menu awal atau tidak.
#include
#include
#include
#include
int hasil1;
char jawab;
int pil,a,t,p,l,s1,s2,n,b,masukan;
int L_segitiga()
{
int L1;
L1=0.5*a*t;
return L1;
}
int L_pp()
{
int L2;
L2=p*l;
return L2;
}
int L_trapesium()
{
int L3;
L3=0.5*(s1+s2)*t;
return L3;
}
int faktorial()
{
int n,b;
cout<<"Masukkan jumlah faktorial : ";cin>>n;
cout<b=1;
for (int a=1;a<=n;a++)
{
b=b*a;
}
cout<cout<return b;
}
void main()
{
jawab='Y';
while(toupper(jawab)=='Y')
{
cout<{clrscr();
cout<<"=============================="<cout<<"| Program Ahmad Nurdin Tsani |"<cout<<"=============================="<cout<<" Menu Pilihan "<cout<<"1. segitiga "<cout<<"2. persegi panjang "<cout<<"3. trapesium "<cout<<"4. faktorial "<cout<<"Masukkan pilihan anda : ";
cin>>p;
switch (p)
{
case 1 : cout<<"Masukkan alas : ";cin>>a;
cout<<"Masukkan tinggi : ";cin>>t;
hasil1=L_segitiga();
cout<<"Luas segitiga adalah "<cout<break;
case 2 :cout<<"Masukkan panjang: ";cin>>p;
cout<<"Masukkan lebar: ";cin>>l;
hasil1=L_pp();
cout<<"Luas Persegi panjang adalah "<cout<break;
case 3 : cout<<"Masukkan sisi pertama : ";cin>>s1;
cout<<"Masukkan sisi kedua : ";cin>>s2;
cout<<"Masukkan tinggi : ";cin>>t;
hasil1=L_trapesium();
cout<<"Luas Trapesium adalah "<cout<break;
case 4 :faktorial();
break;
default:
cout<<"Masukan anda salah!";
}
cout<cout<<"Apakah anda ingin mengulang?(Y/T) : ";
do{
putchar('\b');
jawab=getche();
}while(!(toupper(jawab)=='Y'||toupper(jawab)=='T'));
cout<}}}

DASAR PEMROGRAMAN PHP

PHP adalah salah satu bahasa pemrograman dalam pembuatan web. PHP bersifat server side
dan bisa dikoneksikan dengan database seperti MySQL, PostgreSQL, SQL server, Oracle dsb.
Kareba PHP bersifat server side, maka untuk dapat menjalankan PHP pada browser, maka anda
diharuskan terlebih dahulu menginstall web server yang bisa anda dapatkan secara gratis dari
internet, misalnya Apache, PHP Triad, PWS, Wammp, Xampp, dsb.

PHP disimpan dalam file berekstensi .php, .php3 atau .phtml, itu tergantung dengan settingan
PHP anda, tetapi secara umum ekstensi file PHP adalah .php. Kode PHP menyatu dengan tag –
tag HTML dalam satu file. Kode PHP diawali dengan tag .
Ketik sintak seperti di bawah ini menggunakan notepad atau program lain yangbisa
mendukung file PHP. Kemudian simpan di direktori web server anda biasanya bernama htdocs
dengan nama info.php.


Struktur penulisan dalam PHP, sama seperti dalam C++, yaitu setiap pernyataan diakhiri oleh
semicolon ( ; ) dan bersifat case sensitive untuk penulisan nama variabel. Cara penulisan
komentar dalam PHP juga sama dengan C++.

Contoh :
contoh1.php
$nama = "belajar php";
print "Isi dari variabel adalah $nama";
?>

PHP mengenal 5 tipe data yaitu integer, floating point, string, array dan object. Penggunaan
tipe data tidak secara ekspilisit di deklarasikan seperti dalam C++.
Contoh :
Contoh2.php
// Penggunaan tipe data int, float dan string serta type castingnya
$var = 2008 ; // var sebagai integer
print "Sekarang tahun $var.
";
$var = "dua ribu delapan"; // var sebagai string
print "Sekarang tahun $var.
";
$var = 2008.55; // var sebagai bilangan bulat / float
print "Tahun $var, ada atau nggak ?";
?>

Contoh3.php
// Penggunaan tipe data object
class himp
{
var $divisi = "Contoh PHP yang ketiga";
function ubah($str)
{
$this->divisi = $str;
}
}
$hme = new himp;
print $hme->divisi;
print "
";
$hme->ubah("Belajar PHP itu menyenangkan");
print $hme->divisi;
?>

Dalam PHP terdapat operator artimatika, assignment, bitwise, perbandingan, logika ,
increment / decrement yang kesemuanya sama dengan C++ dalam cara penggunaannya.

Dalam PHP juga terdapat conditional statement yang cara penggunaannya sama seperti dalam
C++.

Dalam PHP, tipe data balikan sebuah fungsi tidak di deklarasikan secara eksplisit seperti
dalam C++. Dalam PHP, fungsi tidak perlu dideklarasikan, cukup di definisikan saja.
Pendefinisian fungsi dapat diletakkan di awal, tengah, akhir maupun di file lain.

Deklarasi array :
1. $divisi[3] = {“HTML”,”PHP”,”CSS”};
2. $divisi = array{“HTML”,”PHP”,”CSS”};
Menghitung jumlah elemen array menggunakan fungsi count($array)  contoh :
count($divisi) menghasilkan nilai 3;
Mengambil potongan elemen dari suatu array, menggunakan array_slice()
array_slice(variable_array,parameter_offset, panjang);
variable_array adalah nama variable array yang ingin kita potong. Parameter_offset, jika
positif menunjukkan elemen awal pemotongan dihitung dari depan, sedangkan jika negatif di
hitung dari belakang ( yaitu urutan ke parameter_offset dari belakang ). Panjang yaitu
menentukan panjang elemen yang dipotong. Jika panjang tidak diberikan, maka array
dipotong mulai dari nilai elemen yang ditentukan oleh parameter_offset sampai elemen
terakhir.

Membuka File  fopen(nama_file, mode_akses);
Menutup File  fclose(file_pointer)
Membaca Isi File  fgets(file_pointer, panjang_string)
Tag HTML tidak diabaikan
fgetss(file_pointer, panjang_string)
Mengabaikan tag HTML
Menulis ke File  fputs(file_pointer,string)
Memeriksa apakah pointer telah berada di akhir file  feof(file_pointer)
Ket :  Gunakan fungsi
mode_akes pada PHP sama dengan mode akses pada C++.
$file = fopen(“coba.txt”,”r+w”). $file disebut sebagai file_pointer

Bagian ini tidak membahas tentang MySQL, namun bagian ini membahas pengaturan
hubungan antara PHP dan MySQL secara general. Mengenai struktur database, table, field
mauoun pengertian querinya diberikan pada modul MySQL.
Untuk dapat berhubungan dengan MySQL, PHP harus membuka hubungan ke server MySQL,
yaitu dengan
mysql_connect(nama_host, nama_user, password);
Setelah tersambung, maka user memilih database, yaitu dengan
mysql_select_db(nama_database);
Untuk mengeksekusi query – query yang ada pada MySQL namun tidak dimiliki oleh PHP
digunakan fungsi
mysql_query(query);
Mengenai query – query yang ada, dapat anda lihat dalam modul MySQL.
Untuk mengambil hasil query yang dilakukan oleh mysql_query() digunakan fungsi
mysql_fetch_row(result_id) atau mysql_fetch_array(result_id)
Beda antara mysql_fetch_row() dan mysql_fetch_array() adalah pada mysql_fetch_array() hasil yang diperoleh dalam bentuk array assosiatif.
Setelah penggunaan database mysql selesai, maka koneksi diputus dengan menggunakan
mysql_close();