Var sumArr, i : Integer; arr : Array[1..20] of Integer; Begin sumArr := 0; for i := 1 to 20 do begin sumArr := sumArr + arr[i]; end; writeln('Sum ', sumArr); End
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку