Помогите переделать код с с++ на другие языки

Помогите с с++ на pascal и vb переделать
#include
#include
using namespace std;

int main() {
int n = 0;
double x = 0.0, sum = 0.0;
cin >> n >> x;

for (; n > 0; --n) {
x = sin(x);
sum += x;
}
cout << sum;
return 0;