Строковые переменные, Сортировка. Опции

[kamentaru]

Задача:Задан массив букв и чисел. Найти произведение всех чисел заданного массива.
Перерыла почти весь поиск. Не знаю как отсортировать буквы и цифры от массива. Помогите решить.

[klem4]

а)

if s[i] in ['0'..'9'] then begin
      val(s[i], x, e);
      p := p * x;
    end;

+ FAQ : Строки
б) Не сменишь аватар придется тебя забанить.

[volvo]

Задан массив букв и чисел

Как именно задан? Формально вот ЭТО - тоже массив букв и чисел (а не цифр), но при таком определении вышеприведенный код даже не откомпилируется:

Const
  arr: array[1 .. 5] of string = (
    'a', '16', '-34', 'e', 'm'
  );

[klem4]

чисел, а не цифр

Да спросони ошибся, как из дома вышел сразу понял что не то написал ;)

зы аватар уже лучьше

[мисс_граффити]

 val(s[i],x,e);
if e=0 then
  p:=p*x 

так можно?

[klem4]

Да можно и как я написал, но и твой и мой варианты годятся только для случая, когда массив задан так, как показал Volvo, а если это просто строка символов, то все будет немного подругому, в общем ждем автора ..

[мисс_граффити]

а разве твой сочтет, что '16' in ['0'..'9']? а '-34'?

[klem4]

;) Нет конечно
Просто сегодня мозг отдает пальцам команды печатть бред)
виноват