Question

Найти количество чётных двузначных чисел, не превосходящих заданного числа N. Входные данные: в первой строке одно целое число N, (10 <= N <= 99) Выходные данные: одно число, являющееся ответом в соответствии с условием задачи. Пример 1. на входе: 36 на выходе: 14 Спасите меня пожалуйста

Answer 1

Var n: integer;
begin
read(n);
write((n-8) div 2)
end.