p=1
FOR i=5 TO 79
IF i MOD 4=0 THEN k=k+1:p=p*i
NEXT
PRINT"kol=";k
PRINT"proizv=";p
Похожие записи/страницы:
- Вычислить количество и произведение чисел, кратных 4, на отрезке от 5 до 79 с помощью цикла - Do while .... Loop-…
- Вычислить количество и произведение чисел, кратных 4, на отрезке от 5 до 79- QBasic(Бейсик)
- Даны целые числа из промежутка [-24; 56]. Найти сумму всех нечетных чисел и количество четных чисел. Найти произведение…
- Ввести два массива длиной 8. Определить номера отрицательных элементов одного массива и произведение положительных…
- Ввести два массива длиной 8. Определить номера отрицательных элементов одного массива и произведение положительных…
- Найти произведение элементов кратных трем. - Basic(Бейсик)