calculate the area of ​​a rectangle (Delphi)

Posted by Dewi Mulyani | Sunday, February 10, 2013 | Labels: , |


var p,l,luas:integer;
begin
p:=10;
l:=5;
luas:=p*l;
write(‘luas=’,luas);
readln;
end.

0 comments:

Post a Comment

Subscribe to: Post Comments (Atom)