Используя циклы решить задачу в паскале:

Вычислить значение переменной у, при заданном значении n

Var   y: real;   x,n: integer;Begin   Writeln('n=');   Readln(n);   y:=0;   x:=0;        For x:=0 to n do            begin                y:=y+x/(x+2);            end;   Writeln(y:6:5); end.

Пользователь Josy всё верно написал. Цикл заключается в том, что пошагово вместо числа n ты подставляешь любые числа (в данном случае натуральные). Получая для каждого n собственное y. Решая в Паскале, компьютер запросит тебя ввести любое число и вычислит Y. Удачи!