const N = 15; var arr: array[1..N] of integer; valueOfNumbers, i: integer; begin for i := 1 to N do begin arr[i] := Random(50) - 10; valueOfNumbers := valueOfNumbers + arr[i]; end; Writeln(valueOfNumbers, '/', i, ' = ', valueOfNumbers / i); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
