Делфи

[Nastyity]

В строку Edit вводим например, дробь 5/2, в Memo получить результат: что 5/2 это 2,5. Объясните как это записать((((((( можно еще объяснить мне задачу(((

[Филантроп]

пишите парсер мат выражений- в Сети куча примеров google.ru в помощь

[Nastyity]

что писать?

[Филантроп]

что писать?

уууу, как все запущено
вот например так (только для положительных чисел и 1 операции)

var s:string;{текст из edit}
 op:integer;{операция}
 k:integer;{позиция знака в S}
 x,y:double;
 res:double;;
begin
  s:=edit.text;
  op:=0;k:=0;
  if pos('+',s)<>0  then begin
  op:=1; k:=pos('+',s);end;
   if pos('*',s)<>0  then begin
  op:=2; k:=pos('*',s);end;
   if pos('-',s)<>0  then  begin
  op:=3; k:=pos('-',s);end;
   if pos('/',s)<>0  then begin
  op:=4;k:=pos('/',s);end;
  x:=strtofloat(copy(s,1,k-1));
  y:= strtofloat(copy(s,k+1,length(s)-k));
  case op of
  1:res:=x+y;
  2:res:=x*y;
  3:res:=x-y;
  4:res:=x/y;
  end;
  memo.lines.add(edit.text+'=='+floattostr(res));
end;

[Nastyity]

что то я написала там ошибка((

[Nastyity]

что такое k? op? s?