Преобразование строка ↔ число

Str(x,s) - процедура, преобразующая целое или вещественное выражение x к строковому представлению и записывающая результат в строку s

Val(s,x,errcode) - процедура, преобразующая строку s к целому или вещественному значению и записывающая результат в целую или вещественную переменную x. Переменная errcode - целая; если преобразование невозможно, то в errcode содержится номер первого символа, вызвавшего ошибку

IntToStr(i) - функция, преобразующая целое x в строку

StrToInt(s) - функция, преобразующая строку s к целому; может генерировать исключение

FloatToStr(i) - функция, преобразующая вещественное x в строку

StrToFloat(s) - функция, преобразующая строку s к вещественному; может генерировать исключение

• Пример программы на строки

С клавиатуры вводится строка. Необходимо найти сумму цифр в этой строке и их количество.

var
st:string;
i:byte;
s,k:byte;

begin

readln(st);

s:=0;
for i:=1 to st.Length do
if char.IsDigit(st[i]) then begin s:=s+StrToInt(st[i]); k:=k+1; end;

writeln('s = ',s);
writeln('k = ',k);

end.

• Краткая теория "Множества"

В множестве элементы не могут повторяться.

Объявление множества
m : set of integer;

const n=30;
var m:set of 1..n;
m1: set of 'a'..'z';
m2:set of (winter, spring, summer, outumn)

Добавление элемента в множество
Include(m, 5);

Исключение элемента из множества
Exclude(m,3);

Вывод элементов множества
foreach i in m do writeln(i);

Проверка на принадлежность элемента множеству
if (5 in m) then writeln('включено');

Объединение множеств
m:=m+m1;

Пересечение m1*m2

Разность s1-s2