Размещено 3 года назад по предмету
Информатика
от gorbynofdanil921
пацаны что тут не так помогите пжлста ошибку выдаëт в конце самом, пишет типо встречено. а ожидалось; program dz; var I, x, s: integer; a: array[1..10] of integer; begin randomize; for i:= 1 to 10 do; begin a[i] := random (10..50); write('al', i,']=', a[i]); begin x := 25; begin := s+a[i]: if a [i]>a [x] then s writeln('s=', 3); end.