Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Sum of array
program nizprviput; const max=100; var niz:array[1..max] of integer; n,i,s:integer; begin writeln('Unesite broj elemenata niza: '); read(n); while(n>0) and (n<=max) do begin for i:=1 to n do read(niz[i]); s:=0; for i:=1 to n do begin write(niz[i],' '); s:=s+niz[i] end; writeln(); writeln('Zbir elem niza je: ',s); read(n); end end.
run
|
edit
|
history
|
help
0
sound
Obrni listu
Vector Addition
Ipis unazad ulancana lista
Increase decrease
звёздное небо и подсчёт кратных звёзд
444555666
test22
Pascal Epsilon
Игра НИМ