Сделать из слова другое слово (, тематика)

Var s:string; i:integer;
begin
s:='математика';
delete(s,1,2); // удаляет из строки s 2 символа, начиная с 1-го
writeln(s);
end.