Rabu, Desember 22, 2010

Program Deret




wah ini program apa lagi,ane juga kgak tau in program ap yang jelas klo di suruh buat yah ane buat namanya juga masih mahasiswa bung...wkakwakwkak

ya udah kita langsung aj yah ke source codenya
program deret;
uses wincrt;
var i,jumlah, N: integer;
begin
write('berapa n?');
read(N);
jumlah:=0;
for i:=1 to N do
if i mod 2 <> 0 then
begin
jumlah:=jumlah+i;
if (i<>N) and (i<>N-1) then
write(i,'+')
else
write(i,'=')
end;
write(jumlah);
end.


Compalier C

0 comments:

Posting Komentar

Mohon tinggalkan saran atau kritik,dengan tujuan untuk membangun bukan untuk saling menjatuhkan: