Помогите program n_3; var s, i: integer; a: array[1..10] of integer; begin s:=0; randomize; for i:=1 to 10 do a[i]:=random(100); for i:=1 to 10 do write (a[i],` `); for i:=1 to 10 do s:=s+a[i]; writeln ('s=', s) end.
Объяснение:
оТВЕТ Для того, чтобы исправить данную ошибку нам нужно поменять ''a[i] random(50);'' на ''a[i] := random(50);''
Теперь программа будет успешно работать
Помоги
еще
