Перевод задачи из С++ в Pascal

Question

#include #include #include using namespace std; int main() { int n, i; float result = 0; cin >>n; for(i = 0; i <= n; i++){ result = sqrt(2 + result); } cout <

Muzaffar · Accepted Answer

Если настолько не знаешь С, что программа из 4 операторов представляет собой проблему века - так и сделай по условию, зачем переводить-то?

Антон · Answer

Так, офф-топ. Если Вы сюда пришли не за халявой, а за знаниями:

У Вас немного не это, но нечто похожее. Вас могут к этому скриншотику плавно подводить.

Сергей · Answer

На C++ программа не совсем правильна. Правильно

var i,n:integer; r:real; 
begin 
readln(n); r:=0; for i:=1 to n do r:=sqrt(r+2); writeln(r); readln 
end.

Андрей · Answer

{ превращается в Begin

} превращается в End
for превращается в for

sqrt превращается в sqrt

а с остальным тем более проблем не должно возникнуть