Кто хорошо знает PASCAL?

eps := ...;
k := 1;
S: = 0;

while (abs(k) > eps) do begin
{
    S := S + ( pow(-1, k) / (k*k) );
    k := k + 1;
};

я не помню синтаксис Паскаля, но суть отображена
pow - возвести число в степень - не уверен есть ли такое в Паскале, но можно реализовать при помощи for цикла
abs - модуль чилса или абсолютное значение; если нет ф-ии, то делаем проверку на <0 и умножаем на -1

а точно Рил должно быть? я просто не помню точно, но мы такие вещи через integer писали

Не легче http://google.ru ( Самообучение )

Ну всё, тиксимиес накамгада

S := F (k) / F (k - n);

где

function F (v : longint) : longint;
begin
    Result := 1;

    while v > 1 do
    begin
        Result := Result * v;
        Dec (v);
    end;
end;

Какую? Пиши условия

program calc;
var
operation:byte;
a,b:integer;
begin
writeln('a');
readln(a);
writeln('b');
readln(b);
writeln('1 - sum');
writeln('2 - sub');
writeln('3 - div');
writeln('4 - mul');
readln(operation);
case operation of:
1: writeln(a+b);
2: writeln(a-b);
3: writeln(trunc(a/b));
4: writeln(a*b);
end;
end.

Наглешь средь бела дня    ССЫЫЛЛКУУУ МНЕ ДАЛИ БЫСТРО...    В гугле смотри  

На - http://www.freepascal.org/download.var

Вобще не понимаю зачем тебе это надо, если ты даже информацию в гугле найти не можешь? (без обид)

да поможет тебе книжка по Pascal,
аминь!  
развые в школьной библиотеке таких нету?....

gūglē ieraksti: tp7.zip
vai, ja vēlies latviski lapas: site:.lv tp7.zip

vairākas lapas parādās, kur tūlīt pat var novilkt.
sērskābe: vidusskolās tādu mēdz mācīt - lai skolnieki programmēšanas pamatus apgūtu. ne jau aiz laba prāta meitene zubrīs informātiku :>