A[1 ... 100] и B[1 ... 100] for n:=1 to 100 do A[n]:=n-10; for n:=1 to 100 do B[n]:=A[n]*n сколько положительных значений. кратных 3? 1) 10,2) 50,3) 90,4) 100?

Помогите с кодом по паскалю.→Нужно чтобы ответ который показывается было написано первый столбец столько положительных чисел а если нет положительных чисел в столбце то писало нет положительных чисел в этом столбце←Столбцы пронумеровать Изначально

Для какого из указанных значений числа X ложно выражение (X > 2) ИЛИ НЕ (X > 1) ? 1) 1 2) 2 3) 3 4) 4 Для какого числа X истинно высказывание (X > 2) v (X > 5) → (X < 3) 1) 5 2) 2 3) 3 4) 4 Для какого из указанных значений числа X истинно выражение

найти количество кратных 7 положительных и сумму кратных 3 нечетных отрицательных целых чисел в интервале от - 500 до 600. Помогите написать код в Паскале

1) Вывести на экран числа кратные 16 от 31 до M (M>31) ; 2) Найти сумму 5 натуральных чисел кратных 13; 3) Найти произведение N натуральных чисел кратных 11; 4) Вывести на экран семь первых чисел кратных 7.

1. Написать программу нахождения произевдения всех однозначных чисел не кратных 5. 2. Найти кол-во элементов кратных 7, но не кратных 14 3. Найти минимальный двузначный элемент массива