My site

Site menu
Section categories
Info Mahasiswa [0]
Artikel Kampus [4]
Makalah Kampus [1]
Statistics

Total online: 1
Guests: 1
Users: 0
Main » Files » Kampus » Artikel Kampus

Mencari Volume Kubus
2009-10-20, 10:37 PM
program volume_kubus;

uses wincrt;

var
sisi, volume : integer;


begin

writeln ('program mencari volume kubus');
writeln ('-----------------------------');
writeln ('masukan sisi?'); read (sisi);
volume := sisi * sisi * sisi;
writeln ('jawabannya adalah :'); write (volume);

end.
Category: Artikel Kampus | Added by: YahyaOteda
Views: 625 | Downloads: 0 | Rating: 0.0/0
Total comments: 0
Name *:
Email *:
Code *:
Search
Site friends
  • Create your own site
  • Tag Board

    Copyright MyCorp © 2024