Короче как-то так, будут вопросы пиши в ЛС)
Даааааааааааааааааааааааааааааа
Mod - это остаток от числа. Значит, 9 mod 2 = 1
Program chisla;
var a,b:integer;
begin
read (a);
if
b=a div 2 then
write('Число четное') else
write('Число нечетное');
end.
Дерево -корень
Дерево - ствол
Дерево - фруктовое - яблоня - яблоко
Дерево - хвойное - сосна
Дерево -хвойное - пихта
Дерево - хвойное лиственница
Дерево лиственное - дуб - желудь
Дерево - лиственное - береза