строковые функий

[fati]

Всем привет!!!
строковая и математическая задачка
a:=0.1981
b:=a*a;
результат b=0.03924361 после этого надо использовать строковые функий для (b) ???
s:=delete(b,3,2)
и получить после этого такого результат b=0.924361

я уже проверила ваш ответ спасибо вам огромное
Код:
1) var
2) a,b : extended;
3) s : string;
4) ...
5) a := 0.1981;
6) b := a*a;
7) s := floattostr(b);
8) s := delete(s,3,2);
но выходить такая ошибка на 8 строке: [Error] Unit1.pas(37): There is no overloaded version of 'FloatToStr' that can be called with these arguments

[phomm]

Если именно эта ошибка (хотя она должна указывать на 7 строку, а не 8) то попробуйте вместо extended написать double и проверить.

А так-то там ошибка в том, что я подумал что delete есть функция... а она процедура, строку с ней надо написать так:

delete(s,3,2);