Почему программа не выводит числа, которые делятся на 3 и на 5?
Потому что она и не должна их выводить: ни по условию, ни по коду. В коде выводится только сумма чисел после того как найдено число, отвечающее условию.
В условии задачи - просят вывести сумму чисел, которые отвечают условию.
Дано: Напишите программу, вычисляющую сумму только тех чисел от 1 до N, которые делятся либо на 3, либо на 5.
По условию задачи нужно выводить сумму чисел, а не сами числа.
И не сумму в процессе вычисления.
Чтобы программа отвечала поставленным условиям - нужно writeln из цикла вытащить и выводить сумму после него.
При вводе 10 должно вывести 3+5+6+9+10=33, что и было выведено.
Чтобы выводило найденное число - добавь writeln(i) в тело условия.