Это паскаль тут дается функция 5*e^(-x^2/2) uses crt; var a=-5,b=5,h=0.5: real; x,y: real; function f (x: real): real; begin f(x): = 5*e^(-x^2/2) end; begin clrscr writeln('*y=5*e^(-x^2/2)*'); repeat write('-5='); readln(a); write('5='); readln(b); write('0.5='); until(a

Если что, проверялось только в pascal abc.
uses crt;
var x,a,b,h:real;
begin
writeln('Input a,b,h:');
read(a,b,h);
writeln('x','   ','f(x)');
x:=a;
while x<=b do
begin
writeln(x,'   ',(5*power(e,(-x*-x)/2)):0:2);
x:=x+h;
end;
end.