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

Чтобы вывести положительные элементы массива нужно пройтись о нему обычным циклом for, а внутри цикла делать проверку if (a[i] > 0) then write (a[i], ' '); Аналогично и с кратными 5, только условие будет выглядеть так: if (a[i] mod 5 = 0) then write (a[i], ' ');