Вводятся два числа А и В (В>А). Вывести ** экран числа, которые делятся ** 3, но не...

Question

Вводятся два числа А и В (В>А). Вывести на экран числа, которые делятся на 3, но не делятся на 5 и их количество. (Паскаль)

Answer 1

Var
a, b, i, count: integer;
begin
readln(a);
readln(b);
count:=0;
for i:=a to b do
if (i mod 3 = 0) and (i mod 5 <> 0) then
begin
inc(count);
writeln(i);
end;
writeln('Количество = ', count);
end.

Comments

Что обозначает "count"?  Можно ли его чем-то заменить?

---

count - имя переменной. Можно заменить любым другим, допустим a. Просто count - с англ. - количество,.

---

А что обозначает эта строчка: "if (i mod 3 = 0) and (i mod 5 <> 0) then". Конкретно где цифра 5 и два знака

---

i mod 5 <> 0 - остаток от деления числа i на 5 не равен нулю, то есть i не кратна пяти.

---

Это никак нельзя заменить? Или нужно оставить только в таком виде? Просто так мы ещё не писали

---

Как вариант if (i mod 3 = 0) and not(i mod 5 = 0) then

---

Спасибо большое!!!