program func;
var
a,b,x,y: real;
begin
write('Введите значение x: ');
readln(x);
write('Введите значение a: ');
readln(a);
write('Введите значение b: ');
readln(b);
y := (a + 1) * (b + 2) * tan(x) * exp(b);
writeln('Значение функции: ', y:1:2);
end.