Membuat Koneksi PHP dengan database MySql  dengan mudah

<?php 
$host="localhost"; 
$username="username"; 
$password="password"; 
$database="buku"; 
$connect=mysql_connect($host,$username,$password); 
mysql_select_db($database,$connect); 
?>

username dan password adalah username dan password database MySql. simpan kode diatas dengan nama koneksi.php

Program Konversi Waktu

Program Konversi_Waktu1;
Uses WinCrt;
var j,m,d,dm,sisa,sisa1:integer;
begin
Writeln('Program Konversi Waktu 1');
Writeln('========================');
Writeln;

Program Konversi Waktu pada pascal

Program Konversi_Waktu;
Uses Wincrt;
Var j,m,d,h:integer;
begin
Writeln('Program Konversi Waktu');
Writeln('======================');
Writeln;
Write('Masukkan Jumlah Jam : ');readln(j);
Write('Masukkan Jumlah Menit : ');readln(m);
Write('Masukkan Jumlah Detik : ');readln(d);
Writeln;
h:=(j*3600)+(m*60)+d;
Writeln('Jadi Hasil Konversi : ',h,' Detik');
end.

Program Konversi Suhu pada pascal

Program Konversi_Suhu;
Uses WinCrt;
var f,c:real;
begin
Writeln('Program Konversi Fareinheit Ke Celcius');
Writeln('======================================');
Writeln;
Write('Masukan Suhu dalam Farenheit: ');readln(f);
c:=5/9*(f-32);
Writeln;
Writeln('Jadi Suhu Dalam Celcius Adalah: ',c:4:2);
end.

Program Menghitung Jarak pada pascal

Program Menghitung_Jarak;
Uses WinCrt;
var
x1,x2,y1,y2:integer;
d:real;
begin
Writeln('Program Menghitung Jarak Titik A dan B');
Writeln('======================================');
Writeln;
Write('Masukan Nilai A (X1): ');readln(x1);
Write('Masukan Nilai B (X2): ');readln(x2);
Write('Masukan Nilai A (Y1): ');readln(y1);
Write('Masukan Nilai B (Y2): ');readln(y2);
d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
Writeln;
Writeln('Jadi Jarak Titik A ke B Adalah: ',d:4:2);
end.

Kumpulan Program Pascal Sederhana

ini adalah kumpulan program pascal sederhana

program hallo;
begin
writeln('Hallo, SELAMAT DATANG!!!');
write('Anda sedang menggunakan pascal');
readln;
end.

Program Penjualan Tiket pada c++

LISTING PROGRAMNYA.....

#include<stdio.h>
#include<conio.h>
#include<iostream.h>
#include<iomanip.h>
char nama[25],kt[15][20],lg,tj[12][20],kls[5][25],kj[8][10],tjn[15][20],cls[10][25];
int bt,i,kk[12],harga[25],sub_total[25],hargai[15],jb[10],ub,kmb,total,ks[10],hrg[15];

grs()
{cout<<"\n\t___________________________________";}
garis()
{cout<<"\n-----------------------------------------------------------------\n";}