<em>program jfe3;</em><em>const n=10; {Это будет кол-во элементов массива}</em><em>var a:array [1..n] of integer; i,s:integer;</em><em>begin</em><em>for i:=1 to n do begin</em><em> a[i]:=random(100); {элемент выбирается случайно от 0 до 100}</em><em> s:=s+a[i]; {Когда эл. присвоился, его значение плюсуется к общ сумме}</em><em> end;</em><em>for i:=1 to n do</em><em>writeln(a[i],' '); {показать сам массив}</em><em>writeln(s); {показать сумму}</em><em>readln; {чтобы окно сразу не закрывалось}</em><em>end.</em>
<em> </em>
program jfe3;const n=10; {Это будет кол-во элементов массива}var a:array [1..n] of integer; i,s:integer;begin
randomizefor i:=1 to n do begin a[i]:=random(100); {элемент выбирается случайно от 0 до 100} s:=s+a[i]; {Когда эл. присвоился, его значение плюсуется к общ сумме} end;for i:=1 to n dowriteln(a[i],' '); {показать сам массив}writeln(s); {показать сумму}readln; {чтобы окно сразу не закрывалось}end.
так?