Perhatikan potongan program berikut!
var
i, j, total : integer;
begin
total := 0;
for i := 1 to 100 do
for j := 1 to 100 do
total := total + i - j;
writeln(total);
end.
Berapakah nilai total di akhir program?
total = 0, i = j maka i-j = 0
menurut saya jawabanya -499950, kenapa ?
disitu kan
for i:= 1 to 100 do
for j:= 1 to 100 do
total:=total+i-j;
nilai awal total kan 0
nah setiap i =1 bakal dikurangan sama j dr 1-100
dst sampai nilai i= 100 bakal dikurangan sama j dr 1- 100
kurang lebih jadinya gini
i:= +(1+2+3+...+100)
j:= +(1+2+3+...+100).100
total:= total +i - j
total:= 0 + (1+2+...+100) - (1+2+...+100).100
total:= -(1+2+...+100) .99
total:= -(5050).99
total:= - 499950
itu menurut saya si
sory kalo ada kesalahan mohon dikoreksi
untuk i kan nilainya 1 sampai 100, jadi nilai i:=1 sebanyak 100 kali, i:=2 sebanyak 100 kali ................................ i:=100 sebanyak 100 kali
begitu juga j, nilinya 1 sampai 100, jadi nilai j:=1 sebanyak 100 kali, j=2 sebanyak 100 kali..................................j:=100 sebanyak 100 kali
jadi (1+2+3+4+5.........+100)100 - (1+2+3+4+5....................+100) = 0
Masuk untuk menulis jawaban
kalo saya coba di fpc, hasilnya tuh
"runtime error 201 at $0040146B
$0040146B
$00406751"
ohh iyaa bener 0... maaf.... hehehe
wah
total i = 5050.100
total j = 5050.100
i - j = 0
dimana dapat 5050
Tidak ada tuhan selain Allah
dapet 5050 dari un : 1/2 n2+1/2 n
u 100 : 1/2 1002 + 1/2 100 = 5050
Tidak ada tuhan selain Allah
gan ane mau tanya maksud dari 5050.100 itu , 100 nya dapet darimana ? kenapa di kali 100 ?
Bismillah..
i nya kan sekali doang, kalo j kepake 100 kali
jadi ngitunginnya -99(n(n+1))/2
0 kok