Turbo Pascal (primbon)

Assalamualaikum.

Saya ingin membagi ilmu cara membuat script turbo pascal tentang primbon dalam memenuhi tugas komputer. Selanjutnya klik disini. Terima kasih
Semoga bermanfaat.
Wassalamualaikum.

MEMBUAT PROGRAM PASCAL (Mencari Nilai X dan Y Dari Dua Persamaan Linier)

Bismillahirrahmanirrahim.

Assalamualaikum..

jumpa lagi nih di tugas selanjutnya. kali ini akan dijelaskan tentang membuat flowcart dan program input_output pascal untuk menentukan nilai x dan y dari dua persamaan linear 2 variabel. tentunya akan ditampilkan dahulu flowcart untuk mempermudah membuat programnya.

 

 

 

 

setelah itu kita dapat membuat programnya, seperti di bawah ini:

uses wincrt;

var

x,y,nx,ny,p:real;

a,b,c,d,e,f:integer;

begin

writeln('Persamaan pertama ax+by=c');

write('berapa nilai a:');

readln (a);

write('berapa nilai b:');

readln(b);

write ('berapa nilai c:');

readln (c);

writeln('Persamaan kedua ax+by=c');

write('berapa nilai a:');

readln (d);

write('berapa nilai b:');

readln(e);

write ('berapa nilai c:');

readln (f);

writeln('maka kedua persamaan:');

writeln(a,'x + ',b,'y = ',c);

writeln(d,'x + ',e,'y = ',f);

p:=((a*e)-(b*d));

nx:=(((e*c)+(-b*f)) div (p));

ny:=((-d*c)+(a*f)) div ((a*e)-(b*d));

writeln('nilai x:',nx:2:2);

writeln('nilai y:',ny:2:2);

end.

setelah di-Run atau tekan ctrl+F9 kita dapat menjalankan program untuk mencari nilai x dan y dari dua persamaan linear dua variabel.

silakan mencoba. ^_^
wassalammualaikum.