Pages

Minggu, 14 Juni 2015

TUGAS AKHIR MATA KULIAH KOMPUTER, PROGRAM PERJODOHAN

TUGAS AKHIR MATA KULIAH KOMPUTER, PROGRAM PERJODOHAN 

TUGAS AKHIR MATA KULIAH KOMPUTER 

 
Membuat program perjodohan dengan menggunakan turbo pascal.
Silahkan download disini .

TUGAS 7 KOMPUTER, MENENTUKAN VARIABEL X DAN Y

TUGAS 7 KOMPUTER, MENENTUKAN VARIABEL X DAN Y

MENENTUKAN NILAI VARIABEL X DAN Y
                Berkaitan dengan tugas komputer, saya akan memberikan tutorial tentang cara membuat program untuk menentukan nilai variable X dan Y  dengan mengunakan bahasa pemrograman turbo pascal sehingga kita tidak perlu repot-repot lagi menghitung secara manual, cukup dengan memasukkan data dan tunggu hasilnya. Disini saya menggunakan rumus determinan matriks.
Langkah-langkahnya sebagai berikut:
1. Buka turbo pascal atau tpw, masi binngung antara pascal dengan TPW?
santai , sebenarnya keduanya merupakan software yang sama, bedanya TPW adalah turbo pascal yang di gunakan untuk komputer yang memiliki sistim operasi windows.
2. Masukkan kode-kode di bawah ini.
uses wincrt;
var
x,y,Dx,Dy:real;
a11,a12,k1,a21,a22,k2:integer;
lagi:char;
begin
Writeln(' Menghitung Nilai variabel x dan y dengan Matriks dan Determinan');
writeln('                   Tugas Kelompok 9 : ');
writeln('     SHILVIA PUTRI M.P,DWI MARDIANA, WINDA PARAMITA');
lagi:='y';
repeat
writeln('Persamaan pertama ax+by=c');
write('berapa nilai a:');
readln (a11);
write('berapa nilai b:');
readln(a12);
write ('berapa nilai c:');
readln (k1);
writeln('Persamaan kedua ax+by=c');
write('berapa nilai a:');
readln (a21);
write('berapa nilai b:');
readln(a22);
write ('berapa nilai c:');
readln (k2);
writeln('maka kedua persamaan:');
writeln(a11,'x + ',a12,'y = ',k1);
writeln(a21,'x + ',a22,'y = ',k2);
Dx:=((a22*k1)+(-a12*k2)) div ((a11*a22)-(a12*a21));
Dy:=((-a21*a22)+(a11*k2)) div ((a11*a22)-(a12*a21));
writeln('nilai x:',Dx:2:2);
write('nilai y:',Dy:2:2);
writeln;
write ('apa anda ingin mengulang?(y/t)');
readln(lagi);
clrscr;
until lagi='t';
donewincrt;
end.
                Demikian program untuk menentukan variable X dan Y dengan menggunakan rumus determinan matriks di dalam turbo pascal. Kurang lebihnya kami dari kelompok 9 mohon maaf. Terimakasih dan selamat mencoba J.
Nama Kelompok 9:
1. Shilvia Putri Muslina Pradana             145500059
2. Winda Paramita                                       145500072
3. Dwi Mardiana                                           14550006

Rabu, 22 April 2015

PROGRAM MENGHITUNG LUAS SEGITIGA DAN JENIS SEGITIGA DENGAN TURBO PASCAL

PROGRAM MENGHITUNG LUAS SEGITIGA DAN JENIS SEGITIGA DENGAN TURBO PASCAL

Berkaitan dengan tugas komputer, saya akan memberikan tutorial tentang cara membuat program untuk menghitung luas segitiga siku-siku, segitiga sama kaki, segitiga lancip, segitiga tumpul dan segitiga sama sisi dengan mengunakan bahasa pemrograman turbo pascal sehingga kita tidak perlu repot-repot lagi menghitung secara manual, cukup dengan memasukkan data dan tunggu hasilnya.
Langkah-langkahnya sebagai berikut: