вычислите значение функции y= 3x+9 на отрезке (-3 ; 3) с шагом 0,5
Var x,y:real; begin x:=-3; while x<=3 do begin<br>y:=3*x+9; x:=x+0.5; writeln(y); end; end.
А можешь написать как это будет в quick basic?
не могу