АД
Анастасия Дудина
Помогите пожалуйста с Паскалем, очень нужно!
Нужно написать программу, которая из нечетных чисел начиная с 9 и заканчивая 2001, выбирает те числа. которые не делятся ни на 3, ни на 5
_______
написал такую программу - пишет ошибка
var x, z : integer;
begin
for x : =4 to 1000 do begin
z : = 2*x + 1;
if (( z mod 3 = 0) or ( z mod 5 = 0)) then
writeln('net')
else
writeln(z);
end;
end.