Fenomena tersebut adalah siapa cepat dialah yang dapat. Dalam artian mahasiswa yang paling cepat masuk ke ruang ujian maka dialah yang akan mendapatkan tempat duduk yang strategis. Strategis yaitu mahasiswa itu akan duduk berdekatan dengan seorang mahasiswa yang lebih pintar atau lebih menguasai mata kuliah yang diujikan sehingga demikian mahasiswa tersebut paling tidak kecipratan jawaban. Posisi menentukan prestasi.

Jadilah istilah – istilah dalam dunia informatika kami pakai seperti mahasiswa yang lebih pintar dianggap sebagai server. Dan bila jawaban yang ditunggu tidak kunjung datang maka dianggap server down. Adakalanya server menerima pinjaman handphone untuk sekedar diphoto hasil jawabannya

Meskipun server sedang stabil terkadang ada juga hambatan – hambatan yang terjadi. Seperti yang telah terjadi pada saat UAS metode numerik. Sumpah mati saya tidak tahu apa – apa mengenai mata kuliah ini. Ngerti dikit juga ga, apalagi ditambah harus menggunakan kalkulator yang super canggih (apalagi yang pakai kalkulator Nokia, Siemen, Sony Ericson tidak akan berguna) serta hitungan yang serba ribet menjadikan saya dan semua teman saya seperti ‘kambing conge’ di dalam kelas. UAS metode numerik hanya ada 2 soal, tetapi tetap saja bikin bingung. Jadilah kami semua mengharapkan kemurahan hati serta berdoa agar server cepat selesai sehingga dapat didistribusikan ke client. Tapi apa daya karena firewall yang sangat tebal semua informasi yang akan keluar tertahan oleh firewall tersebut.

Ya nasib buruk menimpa kami semua. Rata – rata hampir semua mendapatkan nilai D. Mau mengulang rasanya malas sekali karena saya sungguh – sungguh ga ngerti mata kuliah ini. Saya hanya dapat berpesan kepada perguruan tinggi itu untuk mengadakan mata kuliah tutorial penggunaan kalkulator

reading DVD……

function TForm1.GetCpuSpeed: Extended;
var
t: DWORD;
mhi, mlo, nhi, nlo: DWORD;
t0, t1, chi, clo, shr32: Comp;
begin
shr32 := 65536;
shr32 := shr32 * 65536;
t := GetTickCount;
while t = GetTickCount do begin end;
asm
DB 0FH
DB 031H
mov mhi,edx
mov mlo,eax
end;

while GetTickCount < (t + 1000) do begin end;
asm
DB 0FH
DB 031H
mov nhi,edx
mov nlo,eax
end;
chi := mhi; if mhi < 0 then chi := chi + shr32;
clo := mlo; if mlo < 0 then clo := clo + shr32;
t0 := chi * shr32 + clo;
chi := nhi; if nhi < 0 then chi := chi + shr32;
clo := nlo; if nlo < 0 then clo := clo + shr32;
t1 := chi * shr32 + clo;
Result := (t1 – t0) / 1E6;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin

//menampilkan  kecepatan prosesor
Label1.Caption := FloatToStr(GetCpuSpeed) + ‘ MHz’;
end;