1. Дан одномерный массив а

Const n=5; var a: array[1… n] of integer; i,l: integer; t: boolean; beginfor i: =1 to n do read (a[i]); for i: =1 to n do if (a[i]>=2) and (a[i] <= 5) then begin l: =i; break end; t: =true; while t do begint: =false; for i: =1 to l-2 do if a[i]