Помогите с решением в ABC паскаль, пожалуйста

Question

Помогите с решением в ABC паскаль, пожалуйста

---

Comments

Во втором задании выражение записано с ошибками (скобок не хватает).

---

так ж мастерски учитель пишет

---

Там закрывающих скобок n штук, ....допускается не писать

---

А вот другое дело - непонятно, что именно находится под каждым знаком корня.

---

Если все скобки в конце, то, видимо, и все знаки корня тоже до конца выражения должны быть.

---

В принципе - да. Обычно любят давать программировать такие вложенные радикалы и цепные дроби.

---

Только непонятно, что за язык АВС Паскаль. Это Pascal ABC, PascalABC.Net или что-то третье?

---

Pascal ABC

---

Да... это довольно тяжкое бесхозное наследие, которое с 2007 года уже не поддерживается разрботчиками.

Answer 1

1.
var n,i:integer; s:real;
begin
write('n='); readln(n);
s:=0;
for i:=1 to n do s:=s+i/(i+1);
writeln('s=',s);
end.

Пример:
n=5
s=3.55

2.
var n,i:integer; s:real;
begin
write('n='); readln(n);
s:=0;
for i:=n downto 1 do s:=sqrt(3*i+s);
writeln('s=',s);
end.

Пример:
n=4
s=2.46721366157235

Comments

спасибо большое С:

---

Пожалуйста