Question

Користувач вводить число n - число коробок. Програма повинна вивести всі числа від 1 до n, що не кратні 3.

Answer 1

n = int(intput())

for i in range(1, n + 1):

if i % 3! = 0:

print(i)

это на питоне

на паскале

var n, i:integer;

begin

read(n)

; for i := 0 to n do

begin

if i mod 3 <> 0 then

begin

writeln(i)

end

; i := i + 1

end;

end.

Answer 2

Для розв'язання цієї задачі ми можемо використати цикл, щоб перебрати всі числа від 1 до n. Під час перебору, ми перевіряємо, чи число не кратне 3 за допомогою операції модуля.

Операція модуля (%) повертає залишок від ділення одного числа на інше. Якщо результат ділення числа на 3 дорівнює 0, то число кратне 3.

Таким чином, код для вирішення цієї задачі може виглядати наступним чином:

n = int(input("Введіть число n: "))

for i in range(1, n+1):
    if i % 3 != 0:
        print(i)

У цьому коді ми спочатку зчитуємо число n від користувача. Потім ми використовуємо цикл `for` для перебору чисел від 1 до n. У тілі циклу ми перевіряємо, чи число не кратне 3, використовуючи операцію модуля. Якщо число не кратне 3, ми його виводимо.

Наприклад, якщо користувач вводить число n = 10, програма виведе наступні числа: 1, 2, 4, 5, 7, 8, 10.