Правильно ли написан код?

Rsa97, ну вот еще вариант,правда не уверена в его правильности
begin
write('x=');
readln(x);
write('n=');
readln(n);
write('EPS=');
readln(EPS);
i := 0;
y := 1.0;
yInDegree := 1.0;
repeat
inc(i);
yMinus1 := y;
y := ((1/n) * ((n-1) * y + (x/yInDegree)));
yInDegree := exp(n*ln(y));
diff := y - yMinus1;
until (Abs(diff) <= EPS);
write('y=',y:8:4);
readln;
end.

Правильно ли написан код?

Rsa97,
Переменная i используется в формуле,а дважды inc(i) это опечатка.

Правильно ли написан код?

Rsa97, в задании никак это не указано,просто n

Правильно ли написан код?

Что бы я ему не присваивала,все равно в ответе 1

Как написать код для определения суммарного объема вложенных друг в друга шаров?

Все понятно, кроме R, ведь он не описан в var и в формуле не используется.Для чего он тут?

Как составить программу в Delphi, которая вводит координаты точки и определяет принадлежит ли эта точка области прямоугольника?

Роман Мирр, формулы в принципе не нужны,вопрос в том,как задать координаты прямоугольника. В условии сказано,что он задан двумя противоположными,но не получится ли это просто прямая?

Как составить программу в Delphi, которая вводит координаты точки и определяет принадлежит ли эта точка области прямоугольника?

Роман Мирр, Совсем не лень. Только начала изучать Delphi, потому прошу помощи разобраться.