1. указать ошибки в описании массива и пути их исправления: var a: array[real] of integer; 2. определить,что распечатает следующая программа: var a: array[1..5,1..5]of integer,i,j; integer; begin for i: =1 to 5 do begin for j: =1 to 5 do begin if i=5-j+1 then a[i,j]: =0 else a [i,j]: =0; write(a[i,j]: 2); end; writeln; end; end. 3. дан линейный массив a [l..n], содержащий целые числа. вычислить сумму чисел делящихся одновременно на 5 и на 3 и распечатать номера таких чисел 4.дан линейный массив a [l..n], содержащий целые числа. преобразовать элементы массива по следующему правилу : если элемент положительный,то заменить его на 1, а если отрицательный - возвести в квадрат