1.Как вывести положительные элементы массива?
2.Как вывести элементы массива кратные пяти?

воспользоваться оператором IF
IF a[i]>0
   then writeln(a[i];

IF (a[i] mod 5=0)
   then writeln(a[i];