длинна строки на паскале, графический режим Опции

[szs]

Помогите пожалуйста, уважаемые ГУРУ, бедному студенту разобраться в вопросе : ваяю программу вывода графика функции и при разметке осей ограничиваю количекство символов

Код

str(z[x].f:8,s);

.
НО! получается правильное округление, а мне этого не нужно, нужно просто обрезать количество символов без округления, но в виде типа 3.1E+01. За раннее Сенькью.

[volvo]

Что-то в таком роде:

  str(z[x].f, s);
  s := copy(s, 1, pos('.', s) + 3) + copy(s, pos('E', s), 255); 

тройка - количество символов после запятой