Кто сможет перевести код из Visual Basic в C++? - VB

Узнай цену своей работы

Формулировка задачи:

Листинг программы
  1. [Function SumSeq(X() As Integer) As Integer
  2. SumSeq = X(1)
  3. n% = UBound(X, 1)
  4. pPrev% = 1
  5. pNext% = 2
  6. Do
  7. If pNext% > n% Then Exit Function
  8. SumSeq = SumSeq + X(pNext%)
  9. k% = pNext%
  10. pNext% = pNext% + pPrev%
  11. pPrev% = k%
  12. Loop
  13. End Function
  14. Sub Test()
  15. Dim X(1 To 10) As Integer
  16. X(1) = 11
  17. X(2) = 22
  18. X(3) = 33
  19. X(4) = 44
  20. X(5) = 55
  21. X(6) = 66
  22. X(7) = 77
  23. X(8) = 88
  24. X(9) = 99
  25. X(10) = 111
  26. Debug.Print SumSeq(X) ' Печать 209 - верно
  27. End Sub

Решение задачи: «Кто сможет перевести код из Visual Basic в C++?»

textual
Листинг программы
  1. #include <cstdlib>
  2. #include <iostream>
  3.  
  4. using namespace std;
  5.  
  6. int SumSeq(int *X, int n)
  7. {
  8.   int pPrev=1,pNext=2,k,s=X[1];  
  9.   while(1)
  10.   {
  11.      if (pNext > n) break;
  12.      s+=X[pNext];
  13.      k=pNext;
  14.      pNext+=pPrev;
  15.      pPrev=k;
  16.   }
  17.   return s;
  18. }      
  19.  
  20. int main(int argc, char *argv[])
  21. {
  22.     int Z[]={0,11,22,33,44,55,66,77,88,99,111};
  23.     int a;
  24.    
  25.     a=SumSeq(Z,sizeof(Z)/sizeof(int));
  26.    
  27.     cout << a << endl; // Вывод 209 - верно
  28.    
  29.     system("PAUSE");
  30.     return EXIT_SUCCESS;
  31. }

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 3.6 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы