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: