Перевести с паскаля на Си++

@konstantah187 · Регистрация: 29.11.2012

Студворк — интернет-сервис помощи студентам

вообщем программа на паскале нужно перевести на с++
суть проги поменять местами главную диагональ и побочную

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
program pr1;
var a:array[1..10,1..10] of integer;
i,j,n,z:integer;
begin
writeln('vvedite n');
readln(n);
for i:=1 to n do
for j:=1 to n do
begin
if i=j then A[i,j]:=j else A[i,j]:=0;
end;
for i:=1 to n do 
begin
 
for i:=1 to n do
begin
 
z:=a[i,i];
a[i,i]:=a[i,n-i+1];
a[i,n-i+1]:=z;
for i:=1 to n do
a[i,n-i+1]:=a[i,i];
end;
end;
for I:=1 to n do
begin
for J:=1 to n do
write(A[i,j]:4);
writeln;
end;
end.

особенно важна эта часть

C++
1
2
3
4
5
z:=a[i,i];
a[i,i]:=a[i,n-i+1];
a[i,n-i+1]:=z;
for i:=1 to n do
a[i,n-i+1]:=a[i,i];

и если нужно вот мой код (у меня динамическая матрица) на си, но он не работает

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
49
50
51
52
53
54
55
56
57
58
#include "StdAfx.h"
#include <iostream>
#include <conio.h>
#include <iomanip>
int main()
{
int n,i,j,temp;
using namespace std;
cout<<"kol-vo strok ";
cin>>n;
int** a;
a=new int* [n]; 
for(int i=0;i<n;i++)
a[i]=new int [n];
 
for(int i=0;i<n;i++)
{
for(int j=0;j<n;j++)
{
    a[i][j]=rand() % 9;
 cout << a[i][j]<< ' ';
}
cout<<endl;
}
for(int i=0;i<n;i++)
{
for(int j=0;j<n;j++)
{
printf("\n\n");
if (i=j) 
{
a[i][j]=j;
}
}
}
for(int i=0;i<n;i++)
{
    
int temp=a[i][i];
a[i][i]=a[i][(n-1)-i];
a[i][(n-1)-i]=temp;
for(int i=0;i<n;i++)
a[i][(n-1)-i]=a[i][i];
}
for(int i=0;i<n;i++)
{
for(int j=0;j<n;j++)
{
cout << a[i][j]<< ' ';
}
cout<<endl;
}
for(int i=0;i<n;i++)
delete [] a[i];  
delete [] a; 
getch();
return 0;
}

Добавлено через 21 минуту
ну помогите народ.. тут дело на минуту, всего эту часть

C++
1
a[i,i]:=a[i,n-i+1];

@Belfegor · 08.09.2013, 22:01

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
#include <iostream>
 
using namespace std;
 
int main() {
    const int size = 10;
    int a[size][size];
    for (int i = 0; i < size; i++) {
        for (int j = 0; j < size; j++) {
            a[i][j] = (i == j ? j : 0);
        }
    }
    for (int i = 0; i < size; i++) {
        for (int i = 0; i < size; i++) {
            swap(a[i][i], a[i][size - i + 1]);
        }
    }
    for (int i = 0; i < size; i++) {
        a[i][size - i + 1] = a[i][i];
    }
    for (int i = 0; i < size; i++) {
        for (int j = 0; j < size; j++) {
            j < size - 1 ? cout << a[i][j] << ' ' : cout << a[i][j] << endl;
        }
    }
 
    system("pause");
    return 0;
}

что то там не то в паскалевском коде

@Слепой Уфолог · 08.09.2013, 22:05

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

for (int i = 0; i < size; i++) {
* * * * for (int i = 0; i < size; i++) {
* * * * * * swap(a[i][i], a[i][size - i + 1]);
* * * * }
* * }

Странно, var i во внутреннем и внешнем for.

@konstantah187 · 08.09.2013, 22:13 **[ТС]**

спасибо огромное, но он выводит не много криво побочную диагональ и к сожалению мы не учили swap и нам обязательно динамичскую матрицу

@Belfegor · 08.09.2013, 22:13

Сообщение от Слепой Уфолог

Странно, var i во внутреннем и внешнем for.

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

for i:=1 to n do
begin
for i:=1 to n do
begin
z:=a[i,i];
a[i,i]:=a[i,n-i+1];
a[i,n-i+1]:=z;

ну так тут так

@konstantah187 · 08.09.2013, 22:22 **[ТС]**

может кто подправит мой код на си?

@Слепой Уфолог · 08.09.2013, 23:10

Code
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
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
#include <cstdio>
 
void
InvertDiagonals(int *mat, const int magn)
{
    for(int i=0; i<magn; i++) {
        int norm_index = i * magn + i;
        int norm_val = mat[norm_index];
        
        int inverse_index = magn - i - 1 + magn * i;
        int inverse_val = mat[inverse_index];
        
        mat[inverse_index] = norm_val;
        mat[norm_index] = inverse_val;
    }
}
 
void
PrintMatrix(int *mat, const int magn)
{
    for (int i=0; i<magn; i++) {
        for (int j=0; j<magn; j++) {
            const int index = i * magn + j;
            printf("%3d ", mat[index]);
        }
        printf("\n");
    }
    printf("\n");
}
 
void
PrintDiagonals(int *mat, const int magn)
{
    for(int i=0; i<magn; i++) {
        int norm_index = i * magn + i;
        int norm_val = mat[norm_index];
        printf("%3d", norm_val);
        
        int inverse_index = magn - i - 1 + magn * i;
        int inverse_val = mat[inverse_index];
        printf("%5d\n", inverse_val);
    }
}
 
int main() {
    const int magn = 10;
    
    const int count = magn * magn;
    int *mat = new int[count];
    
    //заполняем матрицу данными которые
    //соответствуют индексам
    for (int i=0; i<count; i++) {
        mat[i] = i;
    }
    
    printf("Матрица вначале\n");
    PrintMatrix(mat, magn);
    printf("Прямая и обратная диагональ\n");
    PrintDiagonals(mat, magn);
    
    InvertDiagonals(mat, magn);
    printf("\nТеперь матрица\n");
    PrintMatrix(mat, magn);
    printf("Теперь диагонали\n");
    PrintDiagonals(mat, magn);
    
    
    delete mat;
    return 0;
}

У меня выдает:

~$ g++ test.cpp -o test
~$ ./test
Матрица вначале
0 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 49
50 51 52 53 54 55 56 57 58 59
60 61 62 63 64 65 66 67 68 69
70 71 72 73 74 75 76 77 78 79
80 81 82 83 84 85 86 87 88 89
90 91 92 93 94 95 96 97 98 99

Прямая и обратная диагональ
0 9
11 18
22 27
33 36
44 45
55 54
66 63
77 72
88 81
99 90

Теперь матрица
9 1 2 3 4 5 6 7 8 0
10 18 12 13 14 15 16 17 11 19
20 21 27 23 24 25 26 22 28 29
30 31 32 36 34 35 33 37 38 39
40 41 42 43 45 44 46 47 48 49
50 51 52 53 55 54 56 57 58 59
60 61 62 66 64 65 63 67 68 69
70 71 77 73 74 75 76 72 78 79
80 88 82 83 84 85 86 87 81 89
99 91 92 93 94 95 96 97 98 90

Теперь диагонали
9 0
18 11
27 22
36 33
45 44
54 55
63 66
72 77
81 88
90 99
~$

@konstantah187 · 08.09.2013, 23:21 **[ТС]**

спасибо огромное, но это способ примерно 5 курса... вот попалась задачки не из легких

@Слепой Уфолог · 08.09.2013, 23:55

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

спасибо огромное, но это способ примерно 5 курса... вот попалась задачки не из легких

Я сам научился программированию поэтому не знаю что в каком курсе учат, я просто разделил задачу на несколько логических функций чтобы было проще работать и понимать прогу, надеюсь это не запрещено (задачей).

@monolit · 09.09.2013, 00:25

Где ж это на 5 курсе такое проходят, не верю, и все тут) Тебя вводят в заблуждение)

@konstantah187 · 09.09.2013, 00:33 **[ТС]**

огромное спасибо, но это реально серьезный уровень

есть обычный способ вот формула замены диагоналей из паскаля

Pascal
1
2
3
4
5
6
for i:=1 to n do
 begin
   x:=a[i,i];//элемент главной диагонали
   a[i,i]:=a[n-i+1];//пишем на его место элемент побочной диагонали
   a[n-i+1]:=x;//на побочную элемент главной
  end;

но мне всего то надо его перевести в Си, но я не могу ибо выдаёт ошибку

до этой формулы идет создание динамической матрицы, потом этот код и после вывод всего-то

Добавлено через 3 минуты

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
#include "StdAfx.h"
#include <iostream>
#include <conio.h>
#include <iomanip>
int main()
{
int n,m,i,j,temp;
using namespace std;
cout<<"kol-vo strok ";
cin>>n;
cout<<"kol-vo strok ";
cin>>m;
int** a;
a=new int* [n]; 
for(int i=0;i<n;i++)
a[i]=new int [m];
 
for(int i=0;i<n;i++)
{
for(int j=0;j<m;j++)
{
    a[i][j]=rand() % 9;
 cout << a[i][j]<< ' ';
}
cout<<endl;
}
 
........
}
for(int i=0;i<n;i++)
delete [] a[i];  
delete [] a; 
getch();
return 0;
}

Вот шаблон динамической матрицы моей, где точки нужно просто вставить формулу и по идее должно работать

Добавлено через 2 минуты

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

Где ж это на 5 курсе такое проходят, не верю, и все тут) Тебя вводят в заблуждение)

ну у него очень огромный и подробный код, на моём 2 курсе никто не поверит, что я его сам делал

Новые блоги и статьи Все статьи Все блоги /
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&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. На борту пять. . .

@konstantah187 0 / 0 / 0 Регистрация: 29.11.2012 Сообщений: 9
	08.09.2013, 22:13 [ТС]
	спасибо огромное, но он выводит не много криво побочную диагональ и к сожалению мы не учили swap и нам обязательно динамичскую матрицу 0

@konstantah187 0 / 0 / 0 Регистрация: 29.11.2012 Сообщений: 9
	08.09.2013, 22:22 [ТС]
	может кто подправит мой код на си? 0

@konstantah187 0 / 0 / 0 Регистрация: 29.11.2012 Сообщений: 9
	08.09.2013, 23:21 [ТС]
	спасибо огромное, но это способ примерно 5 курса... вот попалась задачки не из легких 0

@monolit 188 / 187 / 46 Регистрация: 24.03.2011 Сообщений: 670
	09.09.2013, 00:25
	Где ж это на 5 курсе такое проходят, не верю, и все тут) Тебя вводят в заблуждение) 0