Tudnátok ötleteket adni? (Pascal, stringek)

Szét lehet bontani tömbre, de nem feltétlenül szükséges, végig lehet menni egyszerre az egész stringen is.

Gondolom nem valódi szavakról van szó, mert abból nem nagyon van csak magánhangzókból álló, tehát kérdés, hogy mi számít külön szónak? Amit szóköz határol? Mi a helyzet az írásjelekkel?

A csak magánhangzó az egy lineáris keresés, ha találsz mássalhangzót szóköz előtt, akkor nem csak magánhangzóból áll.

A szimmetrikussághoz pedig vermet használnék, bele pakolsz minden betűt sorban, ha ugyanolyan jön, mint ami a tetején van, akkor kiveszed. Ha szóköznél üres a verem, akkor szimmetrikus volt a szó.

De egyébként ezekben pont az a feladat, hogy ezekre az algoritmusokra magadtól rájöjj.

A szimmetrikusban segítek egy picit:

program Project1;

function szim(s: string): boolean;

var i: byte;

begin

szim := True;

for i := 1 to Length(s) div 2 do if s[i] <> s[Length(s) - i + 1] then szim := False;

end;

begin

WriteLn(szim('kerek'));

WriteLn(szim('semmi'));

ReadLn;

end.