program f0r;
var
a,b,c,d,i,n : longint;
begin
a:=0;
readln(n);
for i := 1 to n do
begin
read(c);
a:=a+c;
read
end;
writeln(a);
end.
BAB 5 Perulangan sub 2
Be the first to comment
You can use [html][/html], [css][/css], [php][/php] and more to embed the code. Urls are automatically hyperlinked. Line breaks and paragraphs are automatically generated.
Be the first to comment
You can use [html][/html], [css][/css], [php][/php] and more to embed the code. Urls are automatically hyperlinked. Line breaks and paragraphs are automatically generated.