program hitung;

 

uses wincrt;

var pers1,pers2,hasil,hasil2:integer;

begin

writeln(‘nama  : DINA MARTINA ‘);

writeln(‘kelas : 3 D’);

writeln(‘selamat datang di program sistem persamaan liner dengan dua variabel’);

writeln(‘menghitung himpunan penyelesaian dengan cara metode grafik’);

writeln(‘contoh:’);

writeln(‘carilah himpunan penyelesaian dari -x+y=1 dan x+y=5 SPLDV’);

write(‘persamaan pertama -x+y=’);readln(pers1);

write(‘persamaan kedua x+y=’);readln(pers2);

hasil:=pers1+pers2;

writeln(‘jadi’,pers1,’+’,pers2,’=’,hasil);

writeln(‘menghitung himpunan penyelesaian dengan cara metode substitusi’);

writeln(‘contoh:’);

writeln(‘carilah himpunan penyelesaian dari -x+y=1 dan x+y=5 SPLDV’);

writeln(‘pililah salah satu pers,kemudian nyatakan variabel yang 1 dalam bentuk pariabel lainnya.’);

write(‘misalkan x dinyatakan sebagai fungsi y atau y sebagai fungsi x.’);

writeln(‘kemudian substitusikan nilai variabel yang didapat (x atau y) pada langkah 1 kepersamaan yang lain’);

writeln(‘untuk memahami cara penyelesaian SPLDV dengan menggunakan metode eleminasi’)

end.