Question

Найти сумму чисел ряда каждый элемент которого определяется по формуле (i+5)/i и i изменяется от 1 до 20 с шагом 0.4Показать решение(по Pascal)

Answer 1

Program stach;
var i,s:real;
begin
i:=1;
while i<=20 do begin
s:=s+((i+5)/i);
i:=i+0.4;
end;
writeln('s=',s);
end.

Answer 2

Для вычисления суммы чисел в ряду, каждый элемент которого определяется по формуле (i+5)/i, где i изменяется от 1 до 20 с шагом 0.4, вы можете воспользоваться языком программирования Pascal. Вот пример программы:

pascalCopy code
program SumOfSeries;
var
  i: real;
  sum: real;

begin
  sum := 0;
  for i := 1 to 20 step 0.4 do
  begin
    sum := sum + (i + 5) / i;
  end;

  writeln('Сумма ряда: ', sum);
end.

Этот код начинает с нулевой суммы и затем в цикле for выполняет вычисления для каждого значения i в заданном диапазоне и с шагом 0.4. Полученные значения добавляются к переменной sum. В конце программы выводится сумма ряда на экран.