Код на c++ перевести в паскаль. заранее большое #include using namespace std; main() { int a[1001],i,n,l,r,k; cin> > n; for(i=1; i< =n; i++) cin> > a[i]; cin> > l> > r; k=l; for(i=l+1; i< =r; i++) if(a[i]> a[k])k=i; cout< }