EKSPRESI MATEMATIKA

EKSPRESI MATEMATIKA

     Ekspresi matematika adalah perintah untuk mengekspresikan rumus-rumus matematika ke dalam bahasa Delphi7. Misalnya :

²   (bilangan pangkat) Menjadi SQR

√  Menjadi SQRT

Sec x  Menjadi 1/Cos (x)

Tan x  Menjadi Sin (x)/Cos (x)

dll.

Dan hasilnya seperti ini : 

Script nya :

program ekspresi_mtk;

{$APPTYPE CONSOLE}

uses

  SysUtils;

var

  x:real;a,b,c:integer;

begin

  writeln('Nama   : Maisirotul Rizka');

  writeln('NIM    : 114224022');

  writeln;

  writeln('    ==========================================');

  writeln('    Ekspresi Matematika Kedalam Bahasa Delphi7');

  writeln('    ==========================================');

  writeln;

  writeln('x = (-b+SQRT(SQR(b)-4*a*c))/2*a');writeln;

  write('Masukkan a = ');readln(a);

  write('Masukkan b = ');readln(b);

  write('Masukkan c = ');readln(c);

  writeln;

  x:=(-b+SQRT(SQR(b)-4*a*c))/2*a;

  writeln('x = ',x:5:2);

  writeln;

  readln;

end.

Selamat mencoba gays ^^