Вывести все числа от 1 до 1000, которые: -- кратны 3 и 5

Question

Вывести все числа от 1 до 1000, которые: -- кратны 3 и 5

Answer 1

If (a[i]>=1) and (a[i]<=1000) and (a[i] mod 3 = 0) and (a[i] mod 5 = 0) then<br>writeln  a[i];