FPB

uses crt;
var
bil1,bil2,r,m,n,hasil_kali,fpb:integer;
kpk:real;

begin
clrscr;
write('masukkan bilangan pertama:');
readln(bil1);
write('masukkan bilangan kedua:');
readln(bil2);
writeln;
hasil_kali:=bil1*bil2;
if (bil1>bil2) then
begin
m:=bil1;
n:=bil2;
end
else
begin
m:=bil2;
n:=bil1;
end;
repeat
r:=m mod n;
if (r=0) then
begin
fpb:=n;
writeln('FPB dari ',bil1,' dan ',bil2,' adalah ',fpb);
end
else
begin
m:=n;
n:=r;
end;
until (r=0);
writeln;
writeln('KPK dari ',bil1,' dan ',bil2,' adalah ',hasil_kali/fpb:5:0);
readln;
end.

Mail Server

a. Pengertian : Mail Server adalah Perangkat lunak program yang mendistribusikan file atau informasi sebagai respons atas permintaan yang dikirim via email, juga digunakan pada bitnet untuk menyediakan layanan serupa FTP.
b. Karakteristik : Mail server memiliki protokol berbeda dalam pengiriman dan penerimaan mail dari dan ke terminal client. Protokol SMTP digunakan client pengirim mail untuk mengirimkan emailnya ke ISP atau penyedia layanan mail tujuan. SMTP menggunakan Port 25. Protokol SMTP juga digunakan untuk transfer mail antar server penyedia layanan. Sedangkan protokol POP3 digunakan untuk mengambil pesan dari server mail kita. Protokol ini menggunakan Port 110.
c. Contoh Penerapan : Pengguna internet, POP bukanlah suatu barang baru. Dengan menggunakan POP, seseorang mendapat kemudahan untuk mendapatkan mail miliknya dari sebuah mail server, tanpa perlu koneksi yang lama dengan internet yang tentu saja memakan biaya. Client dan server merupakan bagian dari arsitektur yang banyak digunakan pada implementasi layanan internet. Arsitektur ini biasa disebut sebagai client/server architecture. Pengertian client pada pembahasan tentang POP3 ini adalah pihak yang menggunakan layanan POP3 dan server adalah pihak yang menyediakan layanannya.

Web Server

a. Pengertian : Web Server adalah Suatu program (dan juga mesin yang menjalankan program) yang mengerti protokol HTTP dan dapat menanggapi permintaan-permintaan dari web browser yang menggunakan protokol tersebut.
b. Karakteristik : Web server menyediakan alokasi tertentu mulai dari kapasitas penyimpanan di dalamnya, bandwidth maksimal arus data masuk maupun keluar, dan batas maksimal bandwidth secara komulatif. Suatu web server dapat dibangun untuk melayani jaringan lokal saja atau bisa juga diluncurkan ke internet untuk dapat diakses oleh semua pihak. Suatu web server memiliki engine tertentu yang memilah-milah data di dalamnya menjadi halaman-halaman yang akan ditampilkan sesuai permintaan dari client.
c. Contoh Penerapan : Suatu halaman web diakses dengan suatu perintah standard yang disebut URL (Universal Resource Locator). URL ini terdiri dari beberapa bagian antara lain:
 Protokol yang digunakan. Bisa http, https, dan lain-lain.
 Mesin letak informasi. Berisi domain name atau alamat IPnya
 Port. Berisi port dari protokol yang digunakan
 4. Sub directory dan nama file yang kita inginkan.
Pembangunan web server pada umumnya dilakukan dengan menggunakan program Apache. Contoh aplikasinya adalah Xampp, Appserv dan lain-lain.

Proxy Server

• a. Pengertian : Server yang berfungsi untuk menyimpan alamat-alamat favorit pengguna sehingga pengguna dapat mengakses website favoritnya dengan lebih cepat. Proxy server yang dirancang untuk melayani jaringan komputer lokal untuk melakukan koneksi secara tidak langsung ke jasa layanan jaringan yang lain atau ke internet. Proxy server menyediakan sebuah mekanisme dimana pemanggilan fungsi yang disediakan oleh suatu objek tidak dilakukan secara langsung, melainkan melalui proxy. Proxy berfungsi sebagai gerbang akses untuk objek-objek yang berada di belakang proxy, proxy menyediakan interface tunggal untuk mengakses berbagai objek, akses ke fungsi yang disediakan objek-objek tersebut menjadi lebih mudah di pelihara, dan pengguna tidak perlu tahu detail dari fungsi-fungsi yang diakses.
• b. Karakteristik :
•  Firewalling dan Filtering
• Beberapa Administrator Jaringan menggunakan firewall dan Proxy Server untuk bekerja secara bersama-sama. Untuk menerapkan konsep ini, harus menginstal kedua-duanya firewall dan perangkat lunak Proxy server pada suatu Gateaway server. kemampuan Proxy Server relatif cerdas dibandingkan Router biasa.
•  Sharing Koneksi
• Sharing koneksi ke internet di dalam suatu jaringan komputer memerlukan media sebagai penghubung antara jaringan lokal dengan internet yang dinamakan Proxy Server. Dengan konsep ini akses ke internet menjadi lebih cepat dan terkontrol, misalnya saja Komputer mana saja yang bisa Web browser atau yang hanya bisa menggunakan E-mail saja dll. Proxy dapat menyembunyikan IP Address, karena hanya IP komputer proxy yang terlihat dari internet.
•  Web Caching
• Penyimpan hasil browser pada Proxy Server memberikan nilai yang lebih pada sharing koneksi internet, karena akan mengurangi waktu dan bandwidth yang digunakan untuk membuka sebuah halaman web sites. Halaman web sites yang telah dibuka sebelumnya disimpan di virtual memory Proxy Server kemudian akan diteruskan ke user, jadi user tidak perlu menunggu lama untuk sebuah koneksi.
• c. Contoh Penerapan : Aplikasi untuk mengelola Proxy Server ini menggunakan berbagai macam software antara lain : Winroute, Wingate, ISA Server dan lain-lain. Sebagai contoh, Proxy Web Server dapat memeriksa URL dari permintaan untuk Halaman web dengan memeriksa HTTP GET dan POST Messages. Dengan menggunakan fitur firewalling dan filtering, Administrator dapat menghalangi akses ke suatu WebSites yang dianggap ilegal. Demikian juga untuk lalu lintas data router biasa dapat menyaring nomor port atau IP, tetapi Proxy server dapat juga menyaring didasarkan atas aplikasi didalam proxy itu sendiri.

Database Server

a. Pengertian : Sebuah node pada sebuah jaringan komputer yang dikhususkan untuk menyimpan database bersama dan memproses permintaan database yang dikirimkan oleh pemakai pada node lain.
b. Karakteristik : Klien bertanggung jawab dalam mengelola antar muka pemakai (mencakup logika penyajian data, logika pemrosesan data, logika aturan bisnis). Database server bertanggung jawab pada penyimpana, pengaksesan, dan pemrosesan database. Database serverlah yang dituntut memiliki kemampuan pemrosesan yang tinggi Beban jaringan menjadi berkurang Otentikasi pemakai, pemeriksaan integrasi, pemeliharaan data dictionary dilakukan pada database server Database server merupakan implementasi dari two-tier architecture
c. Contoh Penerapan : Menggunakan Software sebagai berikut :
• SQL Server, dibuat oleh Microsoft.
• MS Access, dibuat oleh Microsoft.
• Oracle Database, dibuat oleh Oracle.
• MySQL, dibuat oleh MySQL AB.
• Firebird, dibuat oleh komunitas open source berdasarkan dari kode Interbase.
• PostgreSQL, dibuat oleh komunitas open source.
• DB2, dibuat oleh IBM.
Contoh Two-Tier Architecture

File Server

a. Pengertian : file server merupakan jantungnya kebanyakan jaringan, merupakan komputer yang sangat cepat, mempunyai memori yang besar, harddisk yang memiliki kapasitas besar, dengan kartu jaringan yang cepat. Sistem operasi jaringan tersimpan disini, juga termasuk didalamnya beberapa aplikasi dan data yang dibutuhkan untuk jaringan.
b. Karakteristik: Sebuah file server bertugas mengontrol komunikasi dan informasi diantara node/komponen dalam suatu jaringan. Terlihat bahwa tugas file server sangat kompleks, dia juga harus menyimpan informasi dan membaginya secara cepat. Sehingga minimal sebuah file server mempunyai beberpa karakter seperti tersebut di bawah ini :
Processor minimal 166 megahertz atau processor yang lebih cepat lagi
Sebuah Harddisk yang cepat dan berkapasitas besar atau kurang lebih 10 GB
Sebuah RAID (Redundant Array of Inexpensive Disks).
Sebuah tape untuk back up data (contohnya . DAT, JAZ, Zip, atau CDRW)
Mempunyai banyak port network
Kartu jaringan yang cepat dan reliabilitas
Kurang lebih 32 MB memori

c. Contoh Penerapan : Sebagai contoh mengelola pengiriman file database atau pengolah kata dari workstation atau salah satu node, ke node yang lain, atau menerima email pada saat yang bersamaan dengan tugas yang lain. Contohnya penerapan Samba Server pada openSUSE sebagai File Server tanpa PDC/OpenLDAP.

contoh buku pesanan tanggal 1 oktober 2009

sampel buku kebidanan

buku 6!

sampel buku kebidanan

buku 6!

sampel buku kebidanan

buku 5!

sampel buku kebidanan

buku 4!

sampel buku kebidanan

buku 3!

sampel buku kebidanan

Buku 2!

sampel buku kebidanan

BUKU 1: Asuhan Persalinan & Inisiasi menyusu dini.

Sejarah Singkat Microsoft Office

ejarah panjang perjalanan Microsoft Office hingga saat ini, banyak perubahan dan penambahan fasilitas sejak pertama kali diluncurkan tanggal 30 Agustus 1992. Waktu itu aplikasi perkantoran ini diberi nama Microsoft Office versi 3.0. Pada versi tersebut Microsoft Office menyertakan Microsoft Word sebagai pengolah kata, Microsoft Excel sebagai pengolah angka, Microsoft PowerPoint digunakan sebagai aplikasi presentasi yang handal dan Microsoft Mail digunakan untuk menerima dan mengirim email.
Setelah populer dengan Microsoft Office 3.0, pada tahun 1995-an Microsoft kembali meluncurkan Microsoft Office 95 bersamaan waktu itu Microsoft meluncurkan sistem operasi Microsoft Windows 95. Pada sistem operasi ini Microsoft merombak total Windows versi 3.1 dan Windows 3.11 for Workgroup, perubahan yang cukup signifikan dalam sejarah sistem operais PC saat itu. Sejalan dengan pekembangan sistem operasi Microsoft Windows, Microsoft Office sendiri terus berkembang dan semakin mapan dan terus digandrungi serta digunakan oleh sebagian besar masyarakat komputer di dunia, termasuk di Indonesia.
Sampai pada tahun 2000-an Microsoft sudah meluncurkan beberapa versi Microsoft Office dan sampai saat ini masih tetap digunakan sebagai andalan aplikasi perkantoran modern. Beberapa versi dari Microsoft Office yang masih banyak digunakan saat ini antara lain Microsoft Office 2000, Microsoft Office XP (2002) dan Microsoft Office 2003.

Pada kenyataannya sampai saat ini masih banyak kemampuan Microsoft Office 2003 masih belum tersentuh oleh pemakainya. Namun sejalan dengan perkembangan teknologi dan sistem operasi yang juga terus berkembang, maka diluar dugaan Microsoft kembali akan meluncurkan Microsoft Office 2007 bersamaan dengan Windows Vista yang sebentar lagi akan hadir di tengah-tengah masyarakat komputer dunia.

SEJARAH SINGKAT LINUX

Bagi Anda yang baru menggunakan linux, tentu anda harus tahu bagaimana
sejarahnya linux lahir, dan mudah-mudahan sejarah linux yang saya tulis ini
sedianya anda baca. Life with no history is sucks guys..
Pada tahun 1983 Richard M. Stallman menggagaskan ide kalau sebuah software itu
harus bersifat free software, free software ini bukan berarti gratis, tetapi bebas,
bebas dalam arti anda bisa menjalankan program tersebut sesuka anda, bebas
untuk memepelajari source code, dan merubahnya sesuai yang ada mau, bebas
untuk membuat dan medistribusikan program tersebut sesuka anda, dan bebas
memodifikasi software tersebut seperti yang anda mau. Dibawah ini adalah kutipan
yang saya comot dari situs The Hacker Webzine saat Richard M. Stallman interview
oleh Ronald Van Den Heetkamp.
“....If the program doesn't respect these freedoms, then using it puts you under the
power of its developer. By moving to free software, such as the GNU/Linux system,
you can live in freedom. “
Dengan gagasan tersebut tentunya sangat bertolak belakang dengan apa yang kita
kenal dengan nama Copyright, dan tentu saja sejak Richard M. Stallman menggagas
ide free software lahirlah suatu nama pesaing Copyright yaitu Copyleft yang berarti
kebalikannya. Dan Richard M. Stallman-lah pencetus sistem operasi GNU/Linux,
aplikasi yang dibuat oleh Richard M. Stallman antara lain GNU Compiler (GCC), GNU
Debugger (GDB) dan salah satu yang sangat terkenal yaitu Emacs. Kalau anda ingin
mengetahui lebih jauh mengenai Richard M Stallman anda bisa membacanya di
http://en.wikipedia.org/wiki/Richard_stallman
Hampir seluruh hacker maupun cracker di dunia mengenal nama “Linus Benedict
Torvalds”, emangnya tu orang siapa??? kalau anda belum pernah mendengar nama
“Linus Torvalds” saya akan sedikit menceritakan siapa itu om “Linus Torvalds” yang
namanya sangat me-legenda di kalangan hacker manapun.
“Linus Torvalds” adalah mahasiswa dari Finlandia yang hobinya itu coding-coding
dan coding...(pokoknya cinta bwanget sama komputer). Tapi sayangnya Sistem
Operasi pada saat itu sangat lah mahal dan di kontrol oleh perusahaan AT&T, dan kode program pembentuk sistem operasi itu atau sering disebut source code sudah
tidak lagi tersedia secara bebas.
Lalu apakah yg dilakukan oleh Linus Torvalds??? yup gara-gara Linus Torvalds tidak
mampu membeli Sistem operasi itu (just kidding)...dia moncoba sistem operasi lain
yaitu MINIX (Minimal Unix), MINIX adalah sistem operasi tiruan yang sangat
sederhana seperti Unix, yang dibuat oleh Dr. Andrew Tanenbaum untuk
mengajarkan kepada mahasiswanya tentang cara kerja internal sistem operasi.
Source Code MINIX juga memiliki licensi yaitu “liat boleh, ngotak-atik codenya ta'
kemplang koe” Linus jadi tambah frustasi karna lisensi tersebut. Hhmmm “MINIX
mau gw Hack ah...” yup...bang linus mempelajari seluruh code-codenya dan berkat
ke jeniusannya Linus Torvalds berhasil menciptakan inti sistem operasi (kernel)
yang akhirnya diberi nama Linux (Linux's MINIX)
Setelah dia berhasil membuat Inti Sistem Operasi (kernel) ia mengirimkan email
untuk mengharapkan kerjasama komunitas untuk membantu menyempurnakan
Linux. Tak terpikirkan oleh bang Linus Torvalds ternyata email yg ia kirimkan ke
komunitas mendapatkan respon yang sangat menakjubkan. Programer-programer
saling bahu-membahu untuk mengembangkan apa yg telah ia buat. Dan sampai
sekarang ini Linux bisa bersaing dengan sistem operasi lain yang termahal
sekalipun.

logo manajemen informatika

logo manajemen informatika Undiksha singaraja.
Maju terus pantang mundur.....

Gema Informatika

GI merupakan ajang tahunan yang diselenggarakan di informatika Undiksha singaraja. Diselenggarakan setiap bulan oktober. Acara ini diselenggaran karena serangkaian hut Informatika. Semoga acara ini dapat berjalan dengan sukses....
Good Luck :)

tugas_Ap2

program tugas_alpro2;
uses wincrt;
const garis='------------------------------------------';
type id_mahasiswa = record
nim,nama: string;
tugas,uts,uas,skor:real;
end;
type larik = array [1..10] of id_mahasiswa;
var
mhs:larik;
i,n:integer;
temp_mean:real;
procedure urut_tampil(n :integer; var mhs1:larik);
var
i,j,k:integer;
temp1:real;
temp2,temp3:string;
temp4,temp5,temp6:real;
ketemu:boolean;
begin
for i := 2 to n do
begin
temp1:= mhs1[i].skor;
temp2:= mhs1[i].nim;
temp3:= mhs1[i].nama;
temp4:= mhs1[i].tugas;
temp5:= mhs1[i].uts;
temp6:= mhs1[i].uas;
j := i-1;
ketemu:=false;
while (j>=1) and (not ketemu) do
begin
if temp1 < mhs1[j].skor then
begin
mhs1[j+1].skor:= mhs1[j].skor;
mhs1[j+1].nim:=mhs1[j].nim;
mhs1[j+1].nama:=mhs1[j].nama;
mhs1[j+1].tugas:=mhs1[j].tugas;
mhs1[j+1].uts:=mhs1[j].uts;
mhs1[j+1].uas:=mhs1[j].uas;
j:= j-1;
end
else
begin
ketemu:=true;
end;
end;
mhs1[j+1].skor :=temp1;
mhs1[j+1].nim:=temp2;
mhs1[j+1].nama:=temp3;
mhs1[j+1].tugas:=temp4;
mhs1[j+1].uts:=temp5;
mhs1[j+1].uas:=temp6;
end;
begin
writeln(garis);
writeln('no ! nim ! nama ! tugas ! uts ! uas ! skor');
writeln(garis);
for i:= 1 to n do
begin
write(i,' ! ',mhs1[i].nim,' ! ',mhs1[i].nama,' ! ',mhs1[i].tugas:0:2);
write(' ! ',mhs1[i].uts:0:2,' ! ',mhs1[i].uas:0:2,' ! ',mhs1[i].skor:0:2);
writeln;
writeln(garis);
end;
end;
end;
procedure min_max(n:integer;var mhs1:larik);
var
temp_min,temp_max:real;
min,max:real;
begin
temp_min:=mhs1[1].skor;
temp_max:=mhs1[1].skor;
for i:= 1 to n do
begin
if temp_min <= mhs1[i].skor then
min:=temp_min
else
min:=mhs1[i].skor;
if temp_max >= mhs1[i].skor then
max:=temp_max
else
max:=mhs1[i].skor;
end;
writeln('nilai min:',min:0:2);
writeln('nilai max:',max:0:2);
end;
procedure mean_sd(n:integer;mhs1:larik);
var
temp1,jum1,jum,jum2,kuadrat,mean,pembagi,varian,sd:real;
varian0,sd0:string;
begin
temp1:=0;
jum1:=0;
jum:=0;
for i := 1 to n do
begin
kuadrat:=sqr(mhs1[i].skor);
jum1:=jum1+kuadrat;
jum:=jum+mhs1[i].skor;
end;
jum2:=sqr(jum);
mean:=jum/n;
if n >=1 then
begin
pembagi:=n*(n-1);
varian:= (jum1-jum2)/pembagi;
if varian >= 0 then
sd:=sqrt(varian) else
sd0:='standar deviasi tidak dapat dihitung';
end
else
varian0:='pembagi = 0,, perhitungan varian dihentikan';
writeln('mean=',mean:0:2);
if varian >= 0 then
writeln('standar deviasi=',sd:0:2)
else
writeln(sd0);
if n >=1 then
writeln('varian=',varian:0:2) else
writeln(varian0);
end;
function hitung(mhs:larik):real;
var
temp:real;
begin
temp:= (mhs[i].tugas+2*mhs[i].uts+3*mhs[i].uas)/6;
hitung:=temp;
end;

begin
write('masukkan banyak data:');readln(n);
for i := 1 to n do
begin
write('nim:');readln(mhs[i].nim);
write('nama:');readln(mhs[i].nama);
write('tugas:');readln(mhs[i].tugas);
write('uts :');readln(mhs[i].uts);
write('uas :');readln(mhs[i].uas);
mhs[i].skor:= hitung(mhs);
end;
urut_tampil(n,mhs);
min_max(n,mhs);
mean_sd(n,mhs);
readln;
donewincrt;
end.

tugas kuliah algoritma_pencarian

uses wincrt;
type id_mhs= record
nim,nama:string;
end;
var
id : array [1..10] of id_mhs;
i,j,a,n:integer;
temp_cari:string;

begin
i:=0;
repeat
inc(i);
write('masukkan banyak data:');readln(n);
until (i >=3) or (n > 1);
for j := 1 to n do
begin
write('nim:');readln(id[j].nim);
write('nama:');readln(id[j].nama);
end;
clrscr;
begin
write('masukkan nim:');readln(temp_cari);
A:= 0;
repeat
inc(a);
until (i >= n) or (id[i].nim = temp_cari);
if (id[i].nim = temp_cari) then
writeln('nama:',id[i].nama)
else
writeln('tidak ditemukan');
readln;
donewincrt;
end;

end.

Algoritma_pengurutan

{pengurutan acd dengan nilai maxs}
uses wincrt;
var
i,j,n,imaks,k,temp,maks:integer;
data:array [1..100] of integer;
begin
write('masukkan banyak data:');readln(n);
for i := 1 to n do
begin
write('data',i,'=');readln(data[i]);
end;
for k := n downto 2 do
begin
imaks := 1;
maks:=data[1];
for j := 2 to k do
begin
if data[j] > maks then
imaks := j;
maks:=data[j];
end;
temp:=data[k];
data[k]:=maks;
data[imaks]:= temp;
end;

for i := 1 to n do
begin
writeln(data[i]);
end;
readln;
donewincrt;
end.