Program bog(input, output); type vector=array[1..100] of integer; var n, s, i:integer; z:vector; begin read (n); for I:=1 to n do read (z[i]); s:=0; for I:=1 to n do s:=s+z[i]; writeln (s); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
