Question

Пожаалуйста) В программе Geany Задача 1. Определить четность/нечетность числа, введённого пользователем (использовать операцию mod,  которая находит остаток от деления). Задача 2. Определить, попадает ли введенное число x в интервал [a, b], где числа a и b тоже задаются пользователем.

Answer 1

1)uses crt;
var a:integer;
begin
readln(a);
if a mod 2=0 then writeln('четное') else writeln('нечетное');
end.
2)uses crt;
var x,a,b,i,k:integer;
begin
writeln('введите интервал');
read(a,b);
writeln('введите число');
readln(x);
for i:=a to b do
if i=x then inc(k);
if k=0 then writeln('нет') else writeln('да');
end.

Answer 2

Конечно! Вот примеры программ на языке Python, которые решают ваши задачи:

Задача 1: Определение четности/нечетности числа

pythonCopy code
num = int(input("Введите число: "))

if num % 2 == 0:
    print("Число", num, "является четным.")
else:
    print("Число", num, "является нечетным.")

Программа просит пользователя ввести число, а затем использует операцию % (mod) для проверки остатка от деления числа на 2. Если остаток равен 0, число считается четным, иначе оно считается нечетным.

Задача 2: Проверка попадания числа в интервал

pythonCopy code
num = int(input("Введите число: "))
a = int(input("Введите начало интервала (a): "))
b = int(input("Введите конец интервала (b): "))

if a <= num <= b:
    print("Число", num, "попадает в интервал [", a, ",", b, "]")
else:
    print("Число", num, "не попадает в интервал [", a, ",", b, "]")

В этой программе пользователю сначала предлагается ввести число num, а затем задать начало интервала a и конец интервала b. Затем проверяется, попадает ли число num в интервал [a, b]. Если да, выводится сообщение о том, что число попадает в интервал, в противном случае выводится сообщение о том, что число не попадает в интервал.

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