Question

вычислите значение функции y= 3x+9 на отрезке (-3 ; 3) с шагом 0,5

Answer 1

var x,y:real;
begin
x:=-3;
while x<=3 do begin
y:=3*x+9;
x:=x+0.5;
writeln(y);
end;
end.

Answer 2

не могу