var
jbil, i, jml, bil :
integer
;
begin
jml:=
0
;
read(jbil);
for
i:=
1
to
jbil
do
begin
read(bil);
jml := jml + bil;
end
;
writeln
(jml);
end
.
var
jbil, i, jml, bil :
integer
;
begin
jml:=
0
;
read(jbil);
for
i:=
1
to
jbil
do
begin
read(bil);
jml := jml + bil;
end
;
writeln
(jml);
end
.
Copyright 2010 Welcome to My Blog
Designed by M Habibie |
Bloggerized by M Habibie - Premium Blogger Templates
0 komentar:
Posting Komentar