Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
2 / 2 / 3
Регистрация: 27.11.2012
Сообщений: 42

Переделать из С в С++

08.04.2013, 16:37. Показов 686. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Переделайте пожалуйста на С++

C++
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
#include <stdio.h>
#include <locale.h>
#include <conio.h>
void slau_3(double [][3], double *, unsigned);
double determinant(double [][3]);
int main () {
    double matrix[3][3], vector[3];
    unsigned n, k;
    setlocale(LC_CTYPE, "Russian_Russia.1251");
    for (n = 0; n < 3; n++) {
        k = n + 1;
        printf("Введите через пробел: a%d%dx1 + a%d%dx2 + a%d%dx3 = b%d : ", k, k, k, k + 1, k, k + 2, k);
        scanf("%Lf%Lf%Lf%Lf", &matrix[n][0], &matrix[n][1], &matrix[n][2], &vector[n]);
    }
    slau_3(matrix, vector, 3);
    _getch();
    return 0;
}
void slau_3(double a[][3], double * b, unsigned n) {
    double det[4], temp[3][3], x1, x2, x3;
    unsigned k, r, c;
    for (k = 0; k <= n; k++) {
        if (!k)
            for (r = 0; r < n; r++)
                for (c = 0; c < n; c++)
                    temp[r][c] = a[r][c];
        else
            for (c = 0; c < n; c++)
                for (r = 0; r < n; r++)
                    if (k - 1 == c) temp[r][c] = b[r];
                    else temp[r][c] = a[r][с];
        det[k] = determinant(temp);
    }
    if (det[0]) {
        x1 = det[1] / det[0];
        x2 = det[2] / det[0];
        x3 = det[3] / det[0];
        printf("\nx1 = %Lf\nx2 = %Lf\nx3 = %Lf\n", x1, x2, x3);
    } else printf("\n\aМного корней, система несовместная!");
}
double determinant(double a[][3]) {
    return a[0][0] * a[1][1] * a[2][2] +
           a[0][1] * a[1][2] * a[2][0] +
           a[1][0] * a[2][1] * a[0][2] -
           a[0][2] * a[1][1] * a[2][0] -
           a[0][1] * a[1][0] * a[2][2] -
           a[1][2] * a[2][1] * a[0][0];
}
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.04.2013, 16:37
Ответы с готовыми решениями:

надо переделать задачу она уже решена ну ее нужно переделать
вот задача const n=4; var a:array of integer; i,s:integer; begin for i:=1 to n do begin write('Введите ',i,'-й элемент...

возможно ли переделать код алгоритма под Borland C переделать под Borland Delphi?
Подскажите возможно ли переделать код алгоритма под Borland C переделать под Borland Delphi? У меня есть исходник алгоритма шифрования SEAL...

Переделать
Здраствуйте помогите пожалуйста дум дубом в делфи надо код из паскаля перекинуть в делфи &quot;красивенько&quot;))) с окошками и всей...

5
544 / 93 / 49
Регистрация: 16.12.2011
Сообщений: 317
09.04.2013, 17:44
Вам нужно переделать только ввод-вывод.
0
 Аватар для Kuzia domovenok
4268 / 3327 / 926
Регистрация: 25.03.2012
Сообщений: 12,531
Записей в блоге: 1
09.04.2013, 17:54
Какие конкретные претензии к коду? Ввод-вывод через printf/scanf или что-то ещё не устраивает?
0
2 / 2 / 3
Регистрация: 27.11.2012
Сообщений: 42
09.04.2013, 18:12  [ТС]
Просто я в плюсах не разбираюсь, попросил человек сюда выложить. Тот тоже в плюсах не очень. Плиз переделайте на С++
0
544 / 93 / 49
Регистрация: 16.12.2011
Сообщений: 317
09.04.2013, 19:47
C++
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#include<iostream>
using namespace std;
void slau_3(double [][3], double *, unsigned);
double determinant(double [][3]);
int main () {
    double matrix[3][3], vector[3];
    setlocale(LC_CTYPE, "Russian_Russia.1251");
    for (unsigned n = 0; n < 3; n++) {
        unsigned k = n + 1;
        cout << "Введите через пробел: " << "a" << k << k << "x1 + a" << k << k + 1 << "x2 + a" << k << k + 2 << "x3 = b" << k << " : ";
        cin >> matrix[n][0] >> matrix[n][1] >> matrix[n][2] >> vector[n];
    }
    slau_3(matrix, vector, 3);
    system("pause");
    return 0;
}
void slau_3(double a[][3], double * b, unsigned n) {
    double det[4], temp[3][3], x1, x2, x3;
    for (int k = 0; k <= n; k++) {
        if (!k)
            for (int r = 0; r < n; r++)
                for (int c = 0; c < n; c++)
                    temp[r][c] = a[r][c];
        else
            for (int c = 0; c < n; c++)
                for (int r = 0; r < n; r++)
                    if (k - 1 == c) temp[r][c] = b[r];
                    else temp[r][c] = a[r][c];
        det[k] = determinant(temp);
    }
    if (det[0]) {
        x1 = det[1] / det[0];
        x2 = det[2] / det[0];
        x3 = det[3] / det[0];
        cout << endl << "x1 = " << x1 << endl << "x2 = " << x2 << endl << "x3 = " << x3 << endl;
    } else cout << "\n\aМного корней, система несовместная!";
 
}
double determinant(double a[][3]) {
    return a[0][0] * a[1][1] * a[2][2] +
           a[0][1] * a[1][2] * a[2][0] +
           a[1][0] * a[2][1] * a[0][2] -
           a[0][2] * a[1][1] * a[2][0] -
           a[0][1] * a[1][0] * a[2][2] -
           a[1][2] * a[2][1] * a[0][0];
}
0
2 / 2 / 3
Регистрация: 27.11.2012
Сообщений: 42
09.04.2013, 20:09  [ТС]
Спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.04.2013, 20:09
Помогаю со студенческими работами здесь

Переделать while на for
С Си работаю второй день, раньше пару месяцев программировал на Делфи. Объясню проблему в двух словах - нужно цикл do..while изменить на...

Переделать с C++ на C
Сказали переделать с c++ на с, а я сам только недавно познакомился с c++ и вообще не шарю что относится к общим библиотекам, а что к ++. ...

Переделать из С++ в С#
#include &lt;iostream&gt; #include &lt;sstream&gt; #include &lt;fstream&gt; struct node { node* next; int val; node(int...

Переделать С++ в С
#include &lt;iostream&gt; using namespace std; int NOD(int x, int y) { if (x != 0) return NOD(y%x,x); else ...

Переделать for в while и do while
#include &lt;iostream&gt; #include &lt;conio.h&gt; using namespace std; void calculate(int n); void main() { setlocale(0, &quot;&quot;); int n; ...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&amp;d=1772460536 Одним из. . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru