Помогите перевести из pascal в c++

[nintendo 4]

Помогите пожалуйста перевести из pascal в c++ (Спасибо за ранее)
var I, S:integer;
begin
I:=1;
S:=1;
while S<=100 do
begin
I:=I+1;
S:=S*2+I;
end;
Writeln(I)
end.

[Script 42]

int main()
{
    int l,S;
    l = 1;
    S = 1;
    while(S<=100){

        l = l + 1;
        S = S * 2 + l;
    }
    cout << l << endl;
}

 

[nintendo 4]

14 часов назад, Script сказал:

int main()
{
    int l,S;
    l = 1;
    S = 1;
    while(S<=100){

        l = l + 1;
        S = S * 2 + l;
    }
    cout << l << endl;
}

 

спасибо