Equação do 1º grau com grafico
29/02/2016
0
Não sei se alguém já deve ter postado mas nunca perguntar. Estou fazendo um programa teste de resolução de equações 1º e 2º grau. Em outros foruns já vi que a um componente Tchart. Não sei como usá-lo. Experimentei este código com ele mas ele mostra apenas os eixos x e y positivos.
O que eu quer é assim que a pessoa colocar os valores e o cálculo mostrar o resultado de x e y o gráfico mostra os pontos no plano cartesiano e a reta que passa sobre eles.
É possível?
O que eu quer é assim que a pessoa colocar os valores e o cálculo mostrar o resultado de x e y o gráfico mostra os pontos no plano cartesiano e a reta que passa sobre eles.
É possível?
procedure TForm1.Button1Click(Sender: TObject); var x, y: array[1..10] of real; i: integer; begin chart1.Series[0].Clear; x[1]:= 0; for i:= 1 to 10 do x[i]:= x[i-1]+1; for i:=0 to 10 do begin y[i] := x[i]*x[i] + 2*x[i] -3; Chart1.Series[0].AddXY(x[i],y[i],'',clBlue); end; end;
Carlos Leonel
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)