что там может не правильно показывать? Пиши пжалуйста суть проблем поподробнее, а посты по информативнее!

for i:=1 to N-1 do
for j:=i+1 to N do
if a[j]<a[i] then
begin
temp:=a[j];
a[j]:=a[i];
a[i]=temp;
end;

__________________
Bedankt euch dafür bei euch selbst.

H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ

напишите пример работы с файлами в Turbo Pascal 7 : 1й пример запись, 2й - чтение....... желательно с пояснениями какая функция что делает. Поставлю +сы.

это есть в любом учебнике по паскалю, коих привеликое множество.
По сабжу: есть у когонибуть примеры работы c socks проксями в WinSock, все обыскал не могу найти ничего вразумительного, дошол до того начал изучать описания протоколов мучаюсь мучаюсь и пока ничего

Возможно ли в тексте в memo определить какая там кодировка, досовская (консольная) или нормальная?
Не сконвертировать а именно определить.

2Nightmarе
А это смотрел?
memo1.Font.Charset

или попробуй function GetTextFace(DC: HDC; Count: Integer; FaceName: PChar): Integer;

Как лучше искать определённый символ в строке?! может можно обойтись без массивов?! Pascal

тебе нужно найти все такие символы или только первый такой символ?
объясню:
есть строка: "коло оля даша"
ищем символ: "о"
результат поиска1: 2 - номер искомого символа в строке(это же делает функция pos() в Delphi, не использует массивы)
результат поиска2: 2,4,6 - номера всех найденных символов...(результат и есть массив)
результат поиска3: 3 - колличество найденных символов в строке....

какой из результатов нужен тебе?

1 и 3... =)