FreePascal.ru

а с симафором нужны критические секции?

А вот еще одна задачка на потоки, как ее можно переделать так, чтобы в потоках она считала сумму квадратов элементов массива,а на выходе давала произведение этих сумм.
Например: 1-ый массив 1 2 3 4, его сумма квадратов 1+4+9+16=30
2-ой массив 5 6 7 8 9, его сумма квадратов 25+36+49+64+81=255
а в ...

спасибо

а можно в эти потоки запихнуть арифметические операции...
например,чтобы в одном потоке складывались два числа (a+b), во втором потоке складывались еще два числа (c+d), а в основной программе считалось их произведение?!!

а можно поподобрее об этой задаче?)
она запуститься на операционной системе windows и на обычном FreePascal без дополнительных модулей?)))

а разве это на пакскале?)))
надо написать что-то на подобе вот такого:
uses
sysutils {$ifdef unix},cthreads{$endif} ;

const
threadcount = 100;
stringlen = 10000;

var
finished : longint;

threadvar
thri : ptrint;

function f(p : pointer) : ptrint;

var
s : ansistring ...

задали написать программу на FreePascal, реализующую выполнение двух параллельных потоков....
смотрю в учебник,там ни чего не понятно...
помогите пожалуйста