Помогите с двумя формулам

[Splash]

Нужно объяснить как работают две формулы, сами функции, каков должен быть результат, ну и в чем собственно суть

For i:=1 to length(s)div 2 do if s[i]<>s[length(s)-i+1] then ....


И другая: for i:=1 to length(s) do case s[i] of '0'..'9': inc(cif); else inc(sim);

[alex_fcsm]

For i:=1 to length(s)div 2 do if s[i]<>s[length(s)-i+1] then ....
Просматривает строку и проверяет слово - палиндром ли оно

for i:=1 to length(s) do case s[i] of '0'..'9': inc(cif); else inc(sim);
Подсчитывает количество цифр в строке(cif) и остальных символов

[Splash]

Объясни пожалуйста сам принцип

[alex_fcsm]

1. Просматриваем всю строку
Например слово s="ротор"
i=1 s[1]='р' = s[5-1+1]='р' - верно
i=2 s[2]='о' = s[5-2+1]='о' - верно

2. если символ принадлежит диапазону 0..9 то увеличиваем переменную cif на единицу, иначе переменную sim на единицу.

Почитай про операторы в Паскале

[Splash]

Можно адрес где почитать и спасибо огромное за помощь

[alex_fcsm]

http://yandex.ru/yandsearch?text=%D1...B0%D0%BB%D1%8E

+ хелп в самом Паскале

+ книги в этой ветке в самой первой теме

[Stilet]

Просто набери "операторы в Паскале" в поисковике...
Однозначного адреса не будет, ибо это в учебниках и самоучителях.

[Splash]

Спасибо :-)