Question

Составьте программу определяющую является ли введенное с клавиатуры целое число кратным 3

Answer 1

Var a:integer;
begin
Writeln('Введите целое число');
Readln(a);
if frac(a/3) > 0 then writeln('Число не кратно 3')
else Writeln('Число кратно 3')
end.

P.S. Frac - это дробная часть числа, в данном примере frac(a/3)  это дробная часть числа а деленного на 3

Answer 2

Конечно, вот пример программы на языке Python, которая определяет, является ли введенное с клавиатуры число кратным 3:

# Функция для определения кратности числа 3
def is_multiple_of_three(number):
    return number % 3 == 0

# Ввод числа с клавиатуры
user_input = input("Введите целое число: ")

# Проверка на то, является ли введенное значение целым числом
try:
    user_number = int(user_input)
    if is_multiple_of_three(user_number):
        print(f"{user_number} является кратным 3.")
    else:
        print(f"{user_number} не является кратным 3.")
except ValueError:
    print("Ошибка: Введено не целое число.")

Эта программа сначала запрашивает у пользователя ввод целого числа. Затем она использует функцию `is_multiple_of_three`, чтобы определить, является ли введенное число кратным 3. Если число кратно 3, программа выводит сообщение об этом, в противном случае выводится соответствующее сообщение.

Обратите внимание, что в программе также предусмотрена обработка ошибок, связанных с тем, что пользователь ввел нецелое число.