Массивы и организация циклов Опции

[Black_Jack]

Люди добрые, помогите сделать их, поиском пользоватсья умю, но не нашел подобных решений... я уже сломал голову как их делать.
1)Дан двумерный массив, содержащий 5 строк и 3 столбца. Элементами массива являются целые числа. Упорядочить массив по не убыванию элементов второй строки.
2)Найти сумму 15 членов ряда, в котором An=n^ln(n)/(ln(n))^n
Правда на вторую задачу совсем мыслей нет никаких =(

Сообщение отредактировано: Black_Jack - 15.05.2007 22:06

[ramzes]

Вторая совсем просто.

CONST
N=15;
VAR
SummaRiada : real;
i : byte;
BEGIN
SummaRiada:=0;
for i:=2 to N+1 do SummaRiada:=SummaRiada+exp(ln(i)*ln(i))/exp(i*ln(ln(i)));
writeln(SummaRiada)
END.

Начинаем со второго члена ряда, т.к. при i=1 общий член ряда равен бесконечности (1/0).
А лучше формулу уточни. Для возведения в степень используется то свойство, что
x^y=exp(yln(x))