Размещено 5 лет назад по предмету
Информатика
от Dashutk
program ggl; var n, i, sum : integer; a : array [1..1000] of integer; begin readln (n); sum := 0; for i := 1 to n do begin a[i] := random (100); write (a[i], ' '); sum := sum + a[i]; end; writeln; write (sum / n); end. ОБЪЯСНИТЬ ЧТО ВЫПОЛНЯЕТ КАЖДАЯ СТРОКА!!!