Скачать: CL | DM;

проблема с выводом в мемо   Найти похожие ветки 

← →
Andruh   (2006-01-24 09:09) [0]

Подскажите, пожалуйста, как сделать вывод результата в мемо, который выводится в лейбел...
begin
     x:=strtoint(edit2.text); //diapozon "ot"
     kon:=strtoint(edit3.text); //diapozon "do"
        repeat
           if x<=3
           then
              begin
              fx:=x*x+3+x+9;
              label4.Caption:=label4.caption+#13+"&#207;&#240;&#232; &#245;="+floattostr(x)+" fx="+floattostr(fx)+" ";
              a[i]:=x; b[i]:=fx;
              end
           else
              begin
              fx:=x/x+2-x;
              label4.Caption:=label4.caption+#13+"&#207;&#240;&#232; &#245;="+floattostr(x)+" fx="+floattostr(fx)+" ";
              a[i]:=x; b[i]:=fx;
              end;
           x:=x+h;
           i:=i+1;
        until x>=kon;
     end;
Заранее благодарен

---

← →
Ega23 ©   (2006-01-24 09:34) [1]

> label4.Caption:=label4.caption+#13+"Ïðè õ="+floattostr(x)+"
> fx="+floattostr(fx)+" ";


Вместо этого
Memo1.Lines.Add("Ïðè õ="+floattostr(x)+"
> fx="+floattostr(fx)+" ");

А чё так хило-то? Давай, делай разбор функции. Так, чтобы саму f(x) пользователь в строковом видк задать мог. Вот это у тебя уже заявка на победу будет.

---

← →
ЮЮ ©   (2006-01-24 09:42) [2]

скобки расставь
x*x+3+x+9
x/x+2-x;

или замени на

x*x + x + 12
3 - x

---

← →
Andruh   (2006-01-24 10:02) [3]

Большое спасибо!!! Доведу до ума, как тока экзамен сдам... :)
З.Ы. начанается через 2 минуты :)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c