Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.12;
Скачать: 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+"&#207;&#240;&#232; &#245;="+floattostr(x)+"
> fx="+floattostr(fx)+" ";


Вместо этого
Memo1.Lines.Add("&#207;&#240;&#232; &#245;="+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 вся ветка

Текущий архив: 2006.02.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
2-1137452058
Leito
2006-01-17 01:54
2006.02.12
Форматирование Чисел


1-1136791731
beglec
2006-01-09 10:28
2006.02.12
Долгое копирование потока. Как решить?


15-1137653172
Rentgen
2006-01-19 09:46
2006.02.12
Дискретный аналоговый импульсный выход вход


15-1137997018
Ega23
2006-01-23 09:16
2006.02.12
И снова о сале


2-1138170238
Mike48
2006-01-25 09:23
2006.02.12
А поясните ещё немного про EhLib.......