Форум программистов, компьютерный форум CyberForum.ru

Перевод из одного языка в другой. - C++

Восстановить пароль Регистрация
 
Flammed
1 / 1 / 0
Регистрация: 11.12.2010
Сообщений: 76
03.11.2011, 16:39     Перевод из одного языка в другой. #1
Здравствуйте, всем,нужна небольшая помощь с кодом... т.к. C++ уже почти забыт а Visual Basic не учил...
С++ учил в прошлом году и больше с ним не работал, а сейчас дали задание и ничего сделать не могу...
нужно перевести код из Visual Basic в Visual Studio 2005(2008) года.




вот код
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
--------Ввод коэффициентов системы--------------------------
10 PRINT "Задайте порядок системы": INPUT n
20 DIM a(n, n), b(n), x(n)
30 FOR i = 1 TO n: FOR j = 1 TO n: PRINT "a("; i; ","; j;")=?"
40 INPUT a(i, j): NEXT j: PRINT "b("; i; ")=?": INPUT b(i): NEXT i
--------Прямой ход Гаусса-----------------------------------------
60 FOR i = 1 TO n - 1
--------Выбор ведущего элемента-------------------------------
65 m = i:FOR j = i + 1 TO n
70 IF ABS(a(m, i)) < ABS(a(j, i)) THEN m = j
75 NEXT j
-------Перестановка строк---------------------------------------
80 FOR k = i TO n: с = a(m, k): a(m, k) = a(i, k):a(i, k)=c: NEXT k
90 с = b(m): b(m) = b(i): b(i) = с
-------Исключение коэффициентов в j-м столбце----------
100 FOR j = i + 1 TO n: с = -a(j, i) / a(i, i): FOR k = i+1 TO n
105 a(j, k) = a(j, k) + с * a(i, k)
110 NEXT k: b(j) = b(j) + с * b(i): NEXT j: NEXT i
-------Обратный ход Гаусса--------------------------------------
120 x(n) = b(n) / a(n, n): FOR i = n - 1 TO 1 STEP -1: FOR k = i + 1 TO n
135 b(i) = b(i) - x(k) * a(i, k)
140 NEXT k: x(i) = b(i) / a(i, i): NEXT i
-------Печать результатов---------------------------------------
150 FOR i = 1 TO n: PRINT "x("; i; ")="; x(i): NEXT i
170 END

Заранее огромное спасибо
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.11.2011, 16:39     Перевод из одного языка в другой.
Посмотрите здесь:

вставка одного массива в другой C++
C++ опять комбинаторика (с одного языка на другой)
C++ Из одного формата в другой
C++ перевод из одного языка в другой
C++ из одного файла в другой
C++ Перепись из одного файла в другой
копирование с одного массива в другой C++
перевести с одного языка программирования на другой C++

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 20:43. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru