Паскаль выдаёт ошибку, её исправить: undefined filename(0) : нельзя преобразовать тип keyvaluepair к boolean программа: const n=50; var a: array [1..n] of integer; s: real; i: integer; begin for i: =1 to n do begin read (a[i]); if (a[i]=> 10) then s: =s+a[i]; end; writeln ('s=',s); end.
нужно if (A[i]>=10)
;)