Question

Помогите 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.

Answer 1

Объяснение:

оТВЕТ Для того, чтобы исправить данную ошибку нам нужно поменять ''a[i] random(50);'' на ''a[i] := random(50);''

Теперь программа будет успешно работать