program CalculateY;
vara, b, x, Y: Real;
begina := 11.4;b := -28.013;x := 2.312;
Y := cos(x) + exp(a*x); // Вычисление значения функции
writeln('Y = ', Y);end.
// Вывод: Y = -5.74351978528171
program CalculateY;
var
a, b, x, Y: Real;
begin
a := 11.4;
b := -28.013;
x := 2.312;
Y := cos(x) + exp(a*x); // Вычисление значения функции
writeln('Y = ', Y);
end.
// Вывод: Y = -5.74351978528171