- Beranda
- Komunitas
- Tech
- Programmer Forum
(NEED HELP) JELASIN CODING PASCAL INI DONG GAN!
![BillKaulizt](https://s.kaskus.id/user/avatar/2011/04/07/avatar2796441_4.gif)
![Avatar border](https://s.kaskus.id/images/avatarborder/1.gif)
TS
BillKaulizt
(NEED HELP) JELASIN CODING PASCAL INI DONG GAN!
program deretpangkat;
uses crt;
var
akhir, hasil : real;
n : integer;
begin
clrscr;
write('masukan nilai batas akhir: ');readln(akhir);
writeln;
n:=1;
hasil:=0;
while (n * n) < akhir do
begin
write(n * n, '+');
hasil:=hasil + (n * n);
n:=n+1;
end;
hasil:=hasil + akhir;
write(akhir:0:0,'=',hasil:0:0);
readln;
end.
ane nih anak SMA yg klo kuliah ntar nglanjut ke jur teknik informatika,trus ane baca buku pemprograman nemu deh kode begini,ane masih belum paham ama penjelasan dibuku![Bingung (S) emoticon-Bingung (S)](https://s.kaskus.id/images/smilies/bingungs.gif)
kata temen ane untuk ngehitung jumlah dari deret bilangan 1+4+9+16+...+N,batas akhirnya inputan dari piranti masukan,tolong gan jelasin ke ane secara rinci dong agan' agn yg udah jago
uses crt;
var
akhir, hasil : real;
n : integer;
begin
clrscr;
write('masukan nilai batas akhir: ');readln(akhir);
writeln;
n:=1;
hasil:=0;
while (n * n) < akhir do
begin
write(n * n, '+');
hasil:=hasil + (n * n);
n:=n+1;
end;
hasil:=hasil + akhir;
write(akhir:0:0,'=',hasil:0:0);
readln;
end.
ane nih anak SMA yg klo kuliah ntar nglanjut ke jur teknik informatika,trus ane baca buku pemprograman nemu deh kode begini,ane masih belum paham ama penjelasan dibuku
![Bingung (S) emoticon-Bingung (S)](https://s.kaskus.id/images/smilies/bingungs.gif)
kata temen ane untuk ngehitung jumlah dari deret bilangan 1+4+9+16+...+N,batas akhirnya inputan dari piranti masukan,tolong gan jelasin ke ane secara rinci dong agan' agn yg udah jago
0
848
5
![Guest](https://s.kaskus.id/user/avatar/default.png)
![Avatar border](https://s.kaskus.id/images/avatarborder/1.gif)
Tulis komentar menarik atau mention replykgpt untuk ngobrol seru
Urutan
Terbaru
Terlama
![Guest](https://s.kaskus.id/user/avatar/default.png)
![Avatar border](https://s.kaskus.id/images/avatarborder/1.gif)
Tulis komentar menarik atau mention replykgpt untuk ngobrol seru
Komunitas Pilihan