Turbo Pascal. задачи на вычисления в циклах

[Collapseg]

Здравствуйте. Нужно решить несколько задачек. Знаю, что они в принципе элементарные, но сидеть и разбираться времени нет. Заранее спасибо.
6.Составить программу вычисления суммы натуральных чисел от 15 до 35
9.Составить программу вычисления произведения логарифмов натуральных чисел от 2 до 18.

[Son Of Pain]

Время и желание есть у ребят, которые сидят здесь

[ZX Spectrum-128]

А если есть желание самому научиться программировать, то милости просим к нашему шалашу.

[Poma][a]

А если есть желание самому научиться программировать, то милости просим к нашему шалашу.

К которому уже давно заросла тропинка (

[Stilet]

Составить программу вычисления суммы натуральных чисел от 15 до 35

var s,i:integer;begin for i:=15 to 35 do s:=s+i; write(s);end.

Составить программу вычисления произведения логарифмов натуральных чисел от 2 до 18.

var s:double;i:integer;begin s:=ln(2); for i:=3 to 18 do s:=s*ln(i); write(s);end.

Насчет последнего думаю так:

var s:double;i:integer;begin s:=0 for i:=1 to 10 do s:=s+1/exp(-2*ln(i)); write(s);end.