Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 и находит количество элементов с четными значениями. что тут не правильного? program zad2a; var a: array[1..10]of integer; i: integer; begin for i: =1 to 10 do a[i]: =random(10)+1; for i: =1 to 10 do begin if a[i] mod 2 = 0 then end; writeln(a[i],' '); end.