Написать программу нахождения произведений чисел кратных 3 на отрезке от 1 до 11 на qbasic
Ответы на вопрос
Ответил v1248
0
CLS
S = 1
FOR i = 1 TO 11
IF i / 3 = INT(i / 3) THEN
S = S * i
END IF
NEXT i
PRINT S
S = 1
FOR i = 1 TO 11
IF i / 3 = INT(i / 3) THEN
S = S * i
END IF
NEXT i
PRINT S
Ответил infoman
0
на уроке нам что-то говорили, что нужно использовать какую-то команду A MOD B
Ответил v1248
0
IF i/3 = i mob 3 then
Ответил v1248
0
Выше неверноIF i MOD 3 = 0 THEN
Ответил v1248
0
Эта команда возвращает остаток, если остаток от деления на 3 равен 0 тогда число делится нацело
Новые вопросы
Русский язык,
2 года назад
Английский язык,
2 года назад
Математика,
9 лет назад
Математика,
9 лет назад