Помогите, пожалуйста, перевести код с Pascal на С++

[dodikk]

ссылка на само задание: https://www.cyberforum.ru/pascalabc-...ad1836271.html


program ryad;

var
k, Sum: real;
i: integer;
begin
readln(k);
i := 0;
Sum := 0;
repeat
Inc(i);
Sum := Sum + (i + 1 + k) / (i * k);
until Sum > 1000;
writeln(i);
end.

[AWPoint]

#include<iostream>
using  namespace std;

int main()
{
     double k, sum = 0;
     int i = 0;
     cin >> k;
     while(true) {
         i++;
         sum += (i + 1 + k)/(i * k);
         if(sum > 1000) {
              cout << i << endl;
              break;
         }
     }
     return 0;
}

[AWPoint]

Сообщение от AWPoint

#include<iostream>
using namespace std;

int main()
{
double k, sum = 0;
int i = 0;
cin >> k;
while(true) {
i++;
sum += (i + 1 + k)/(i * k);
if(sum > 1000) {
cout << i << endl;
break;
}
}
return 0;

Пример работы во вложении

[dodikk]

спасибо!

[AWPoint]

Незачто правда я не совсем понял в чем проблема здесь была.