Question

составьте программу вычисления значений функции: y=23x+1 y=21x^2+7x+1963 при x=-5,-4,-3,-2,-1,0,1,2,3,4,5

Answer 1

var 
  i:integer; 
begin   
  for i:=-5 to 5 do   
begin     
    writeln('y=',23*i+1);     
    writeln('y=',((21*i)*(21*i))+7*i+1963);     
    writeln(' ')   
  end; 
end.  

Answer 2

И вопрос: для чего у Вас описаны переменные a,b ?

Answer 3

как в книге было так и списал

Answer 4

там начало y=23x+1 лишнее

Answer 5

Не понял... кто что списал? Вопрос автору ответа был по его программе.

Answer 6

большое спасибо

Answer 7

var
  x:integer;
begin
  for x:=-5 to 5 do
    Writeln(x:2,23*x+1:6,21*x*x+7*x+1963:6)
end.

Результат
-5  -114  2453
-4   -91  2271
-3   -68  2131
-2   -45  2033
-1   -22  1977
 0     1  1963
 1    24  1991
 2    47  2061
 3    70  2173
 4    93  2327
 5   116  2523