Question

Пожалуйста помогите протабулировать функцию на интервале 
-П/2 ≤ x ≤ П/2 c шагом        h = 0,4: 
Y=21cos(П/3-2x)+e^2x 

Answer 1

var x,y,h:real;
begin
h:=0.4;
x:=-Pi/2;
writeln('x':3,'y':8);
while x<=Pi/2 do
  begin
  y:=21*cos(Pi/3-2*x)+exp(2*x);
  writeln(x:5:2,y:8:2);
  x:=x+h;
  end
end.