mencari macam-macam operasi dengan program pascal

uses wincrt;

var
x,y : integer;
O1,O2,O3,O4 :real;

begin
write ('masukkan nilai x = ');
read (x);
write ('masukkan nilai y = ');
read (y);
O1 := x+y;
O2 := x-y;
O3 := x/y;
O4 := x*y;
writeln ('Operasi x+y = ',O1:0:2);
writeln ('Operasi x-y = ',O2:0:2);
writeln ('Operasi x/y = ',O3:0:2);
write ('Operasi x*y = ',O4:0:2);
end.

You May Like :

Share on Facebook

Share on Twitter

Share on Google+

Share on LinkedIn