[Utopiccat1]

В общем заданы действительны величины x,a,e (x<>0, a<>0, e>0). Нужно разработать программу, которая вычисляет значение суммы с заданной точностью и указывает количество учтенных слагаемы. На скрине выражение.
Пропустил лекцию по циклам, и теперь не совсем могу понять, прошу помощи.

[lmikle]

Тут тебе нужен бесконечный цикл с выходом в тот момент, когда очередное слагаемое не будет превышать указанное e.

Код:

var
  k : Integer;
  S, d : Double;
begin
  S := 0;
  k := 0;
  Repeat
  d := f(k,x,a);
  S := S + d;
  Until d < e;
end;

Кажется так. f() - твоя формула.