Помогите срочно Pascal!!!!!

Question

Помогите срочно Pascal!!!!!

olja mairovaa Профи (566), закрыт 1 год назад

ввести значение функции y=4x^2+5x-10 на отрезке [-9;9] с шагом b (pascal)

Answer 1

 uses crt; 
var i, n: integer; b, x: real; 
 
function y(x: real): real; 
begin 
    y := x * (4 * x + 5) - 10 
end; 
 
begin 
    clrscr(); 
    write('b: '); 
    readln(b); 
    n := trunc(18 / b); 
    for i := 0 to n do 
        begin 
            x := i * b - 9; 
            writeln(x:9:6, y(x):20:12) 
        end 
end.

Answer 2

Ну таки запросите х, запросите b
и в цикле пройдитесь от -9 до 9 step b

Answer 3

 program func; 
var  
  x, y: real; 
  b: real; 
begin 
  write('Enter step value b: '); 
  readln(b); 
  x := -9; 
  while x <= 9 do 
  begin 
    y := 4*x*x + 5*x - 10; 
    writeln('For x = ', x:0:2, ' y = ', y:0:2); 
    x := x + b; 
  end; 
end.

Answer 4

козерог Мастер (1958) 2 месяца назад

Program sex;
var hui, pizda: pohui;
begin
sex();
end.