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

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

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