Составьте программу, которая формирует массив из 15 случайных чисел…

var a: array[1… 15]of integer; i: integer; beginfor i: =1 to 15 do begin a[i]: =random (31) -15; write (a[i]: 4); end; writeln; for i: =1 to 15 do if a[i]>=0 then a[i]: =sqr (a[i]) else a[i]: =abs (a[i]); for i: =1 to 15 do write (a[i]: 4); end. var a: array[1… 15]of integer; i: integer; beginfor i: =1 to 15 do begin a[i]: =random (31) -15; write (a[i]: 3); end; writeln; for i: =1 to 15 do if a[i] mod 2=0 then a[i]: =2 else a[i]: =a[i]-5; for i: =1 to 15 do write (a[i]: 3); end. var a: array[1… 15]of integer; i: integer; beginfor i: =1 to 15 do begin a[i]: =random (31) -15; write (a[i]: 3); end; writeln; for i: =1 to 15 do if a[i] mod 6=0 then a[i]: =a[i] div 2 else a[i]: =a[i] div 5; for i: =1 to 15 do write (a[i]: 3); end. var a: array[1… 15]of integer; i,k: integer; beginfor i: =1 to 15 do begin a[i]: =random (31) -15; write (a[i]: 3); end; writeln; k: =a[3]; a[3]: =a[11]; a[11]: =k; for i: =1 to 15 do write (a[i]: 3); end.