HavE yOu aLreAdY KnoW ??

Kamis, 14 Mei 2009

PROGRAM MENENTUKAN NILAI IP SEMENTARA

Kita misalkan terdapat data, yakni sebagai berikut :

No. Nama Mata Kuliah Jumlah SKS Nilai Tugas Nilai UTS Nilai UAS
1. Mary AWK 3 65 82 76
2. Mary Rangkaian 6 86 83 82
3. Mary OS 3 50 93 67
4. Mary Arkom 3 86 83 85
5. Mary B.Inggris 2 86 83 85

Untuk mencari Indeks Prestasi Sementaranya, kita dapat mencarinya dengan program berikut :

awk' { NA=0; NA=($5+$6+$7)/3}
{{if(81<=NA && NA<=100){print $1,$2, $3,$4,$5,$6,$7,NA, "A", $8= 4*$2}}
{{if(71<=NA && NA<=80){print $1,$2, $3,$4,$5,$6,$7,NA, "B", $8= 3*$2}}
{{if(61<=NA && NA<=70){print $1,$2, $3,$4,$5,$6,$7,NA, "C", $8= 2*$2}}
{{if(51<=NA && NA<=60){print $1,$2, $3,$4,$5,$6,$7,NA, "D", $8= 1*$2}}
{{if(0<=NA && NA<=50){print $1,$2, $3,$4,$5,$6,$7,NA, "E", $8= 0*$2}}
BEGIN {jumlah=0}
{jumlah=jumlah+$4}
END { print "Jumlah SKS= ", jumlah}
BEGIN { NT=0 }
{NT=NT+$8}
END{print " Nilai total = ", NT}
BEGIN { IPS =0 }
{ IPK=NT/jumlah}
END {print " IP Sementara=", IPS}' nilai

Keterangan :
Tanda $ menyatakan isi suatu kolom.

posted by Innocentia @ 03.18 0 comments

Rabu, 13 Mei 2009

PROGRAM MENCARI BILANGAN PRIMA

Untuk mencari bilangan prima antara 2 sampai 100, maka kita dapat menggunakan program sebagai berikut :

$ ls -l | awk 'BEGIN {
Bil[100];
}
END {
for (i=2;i<=97;i++ ){ if(i%i==0 && i%2!=0 && i%3!=0 && i%4=0 && i%5!=0 && i%6!=0 && i%7!=0 && i%8!=0 && i%9!=0 || i==3 || i==5 || i==7|| i==2) {print Bil[i],i;} } }'

posted by Innocentia @ 18.53 0 comments

About Me

Name: Innocentia
Home: surabaya, jawa timur, Indonesia
About Me: aq tuh anagh na cute, baek hati, jujur, tidak sombong, dan rajin menabung.... opo tho yo??! www.eepis-its.edu
See my complete profile