Может быть 1, так как 3 буква гласная-а и последняя буква согсасная-н
Составим уравнение это кусочной функции.
По непонятной мне причине, местный редактор формул внутри себя корректно отображает формулу, а при попытке сохранения её в ответ все рушится. Посему формула отправлена во вложение.
var
x, y: real;
begin
Write('Введите х: ');Readln(x);
if x <= -9 then y := 0
else if x < -6 then y := -sqrt(9 - sqr(x + 6))
else if x <= -3 then y := x + 3
else if x < 0 then y := sqrt(9 - sqr(x))
else if x <= 3 then y := 3 - x
else if x < 9 then y := (x - 3) / 2
else y := 3;
Writeln('y=', y)
end.
<span>Алфавит шестнадцатеричной системы счисления - 0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F</span>