Вопрос Можете объяснить по поводу алгоритмов (СРОЧНО) Язык паскаль

[makeu]

У меня есть решение, но я вообще не понимаю как это делать, а мне щас нужно это писать

Если можете, то объясните пожалуйста

 

[NesquiK*!*]

напиши русским языком, потом переведи на паскаль

 

[9741634]

program laba1;
var res:real; x, i:integer;
begin
x:=1;
res:=0;
for i:=0 to 5 do res:= res + ( 1 / (x + i) );
write(' x = ', res);
end.

 

[menn73]

Ты не в состоянии вычислить
1/1 + 1/2 + 1/3 + 1/4 + 1/5 + 1/6
и вывести результат на экран?
Чем же ты все эти годы в школе занимался?

 

[3e2w1q]

не совсем понял что надо. может вот это помогет?

Program Calulate(output);
var val: real;
i: integer;
x: integer;
begin

x:=1;
val:=0;
for i:=0 to 5 do
val:=val+(1/(x+i));
writeln('Result: ', val);
end.