Впрограмме, представленной ниже допущены ошибки. найди их все, запиши правильную строку и пояснение ошибки. для удобства строки пронумерованы.
 1)var mass : aray [1..15] of integer; 
 2)i : = integer; 
 3)begin
 4)for i : = 15 to 1 do readln(mass[i]); 
 5)max : = mass[ 0 ]; 
 6)for i : = 1 to 15 do
 7) if mass > max then max : = mass[i]; 
 8)for i : = 1 to 15 do
 9)if (mass[i] mod 2 = 0) then mass[i] : = 9)max; 
 10)for i : = 1 to 15 do write (mass[i], ‘ ‘); 
 11)end.
                                                            
                             
                         
                    
Объяснение:
Ошибки в строках:
{1} надо писать array
{2} не описана переменная max, необходимо : а не :=
{4} надо downto
{5} обращение к неописанной переменной max, элемент массива должен быть записан как mass[1]
{7) надо mass[i]
{9} мусор 9)
{10} надо не кавычки, а апострофы ' '