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

с pascale на си++ - C++

Восстановить пароль Регистрация
 
машуля94
0 / 0 / 0
Регистрация: 15.03.2012
Сообщений: 4
19.03.2012, 12:13     с pascale на си++ #1
Pascal
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
program matrica;
uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
      n,i,j,x:integer;
begin clrscr;randomize;
repeat
write ('размерность матрицы до' , nmax, ' n= ');
readln(n);
untile n in [1..nmax];
writeln(' исходная матрица');
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=random(50);
write ( a[i,j]:4);
end;writeln;end;
          for i:=1 to n do begin
          x:=a[i,i];
          a[i,i]:=a[i,n-i+1];
          a[i,n-i+1]:=x;
end;
writeln;writeln;
for i:=1 to n do begin
for j:=1 to n do
 
written;end;
readln
end.


отображает главную диагональ и побочную симметрично относительно вертикальной оси
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.03.2012, 12:13     с pascale на си++
Посмотрите здесь:

Pascal Programu v pascale
Pascal лифт на pascale
Turbo Pascal Графика в Pascale
2 программки на Pascale
Программы на Pascale
Turbo Pascal Операции в pascale
Программа на Pascale
Object Pascale Delphi

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Duha666
50 / 50 / 5
Регистрация: 10.03.2012
Сообщений: 138
19.03.2012, 12:26     с pascale на си++ #2
Что-то совсем непонятное делает ваш код, но вот он на С++:

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
#include <stdio.h>
#include <ctime>
#include <cstdlib>
#include <algorithm>
 
using namespace std;
 
const int nmax = 20;
int a[nmax + 1][nmax + 1], n, x;
 
int main()
{
    srand(time(NULL)); // randomize;
    do
    {
        printf("Размерность матрицы до %d. N = ", nmax);
        scanf("%d", &n);
    }
    while (n < 0 || n > nmax);
    printf("Исходная матрица:\n");
    for (int i = 0; i < n; i++)
    {
        for (int j = 0; j < n; j++)
        {
            a[i][j] = rand() % 50;
            printf("%4.0d", a[i][j]);
        }
        printf("\n");
    }
    for (int i = 0; i < n; i++)
        swap(a[i][i], a[i][n - i - 1]);
    printf("\n\n");
    for (int i = 0; i < n; i++)
    {
        for (int j = 0; j < n; j++)
            printf("%4.0d", a[i][j]);
        printf("\n");
    }
}
Yandex
Объявления
19.03.2012, 12:26     с pascale на си++
Ответ Создать тему
Опции темы

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