Перевод с Паскаля на c++

@scorpionid · Регистрация: 12.01.2018

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

Вот код на Паскале :

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
29
30
31
32
33
34
35
36
37
38
39
40
program Matrix40;
var
  a:array [1..10,1..10] of integer;
  NumMax,Num, RowMax, M, N, i, j:Integer;
  Row : set of byte;
 
begin
 Write('N: ');
 Readln(N);
 Write('M: ');
 Readln(M);
 
 for  i:=1 to M do
  begin
   writeln(i,': ');
   for j:=1 to N do
    begin
     Write(j,' : ');
     Read(a[i,j]);
    end;
  end;
 
 for  i:=1 to M do
  begin
   Row:=[];
   Num:=0;
   for j:=1 to N do
     if (a[i,j] in Row) then inc(Num)
     else Row:=Row+[a[i,j]];
 
   if (Num>=NumMax) or (i=1) then
    begin
     NumMax:=Num;
     RowMax:=i;
    end;
 
  end;
 
  Writeln(RowMax);
end.

Надо перевести в C++

@scorpionid · 19.10.2018, 17:23 **[ТС]**

спасибо большое

Добавлено через 18 минут
мне не очень понятно, что значит i == 0?

@stu4ent2018 · 19.10.2018, 17:45

Как в паскале, но можно убрать:

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
#include <iostream>
 
int main() {
    const int MAX_SIZE = 100;
    int x[MAX_SIZE][MAX_SIZE];
    int nummax = 0, rowmax;
    int n = 3;
    int m = 3;
 
    for (int i = 0; i < n; i++) {
        for (int j = 0; j < m; j++) {
            x[i][j] = rand() % 100;
        }
    }
    
    for (int i = 0; i < n; i++) {
        int num = 0;
        for (int j = 1; j < m; j++) {
            for (int k = 0; k < j; k++) {
                if (x[i][j] == x[i][k]) {
                    num++;
                }
            }
        }
        if (num >= nummax) {
            nummax = num;
            rowmax = i;
        }
    }
    
    std::cout << rowmax << "\n";
    
    return 0;
}

@scorpionid · 19.10.2018, 18:08 **[ТС]**

и еще, что такое nummax, просто дополнительная переменная?

@stu4ent2018 · 19.10.2018, 18:09

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

и еще, что такое nummax, просто дополнительная переменная?

то же самое, что и в паскале - сколько повторений в строке с номером rowmax.

@scorpionid · 19.10.2018, 18:19 **[ТС]**

nummax же по сути ничего не делает
можно вроде и без него , так ?

@stu4ent2018 · 19.10.2018, 19:10

Попробуй и узнаешь.

Новые блоги и статьи Все статьи Все блоги /
Doom для терминала без стрельбы и монстров. 3D Raycasting на ascii. dcc0 05.07.2026 Попросил нейронную сеть deepai. org написать рейкастинг 3D с библиотекой ncurses для Linux. Чтобы можно было ходить на стрелочки. Чтобы стены были отрисованы символами. Справилась. Первый вариант. . .	Установка статуса документа по условию Maks 05.07.2026 Алгоритм из решения ниже реализован на нетиповом документе "НарядПутевка" разработанного в КА2. Задача: в табличной части "Материалы" документа при записи автоматически устанавливать статус. . .	Сезонность и суточность закисления почв anaschu 04.07.2026 200 часов это все равно моловато. Есть ситуации, но нестандартные, когда смена происходит за 5 лет. Но обычно это 50 лет и более. Наверное, закисление почвы происходит сезонно в средней. . .	В чем ценность человеческого опыта в глобальном смысле? kumehtar 03.07.2026 Возможно, ценность человека не в том, что он однажды достигает мудрости, а в том, что он становится носителем карты пути. Он знает не только истину, но и последовательность внутренних изменений,. . .
интеграция AnyLogic с самописным REST API и переход на Odoo anaschu 03.07.2026 Успешная интеграция AnyLogic с самописным REST API и переход на промышленную Odoo WMS Сегодня проделал огромный путь от простой симуляции физических процессов до построения полноценной. . .	Поиск всех путей на ориентированном графе. Linux dcc0 02.07.2026 Переработка старого кода из моей статьи. Через несколько переработок от PHP кода к C89 (надеюсь, 89). Но довольно запутанно получилось. Код для Linux. Но если убрать time и то, что с ним. . .	Сам себя обучал rest api anaschu 02.07.2026 Педагогический лайфхак: Почему чистый REST API для ученика намного круче, чем готовые библиотеки Когда мы отказались от капризного JAR-файла AnyLogic и переписали код на стандартный HttpClient,. . .	rest api anylogic - выполнение модели на своём русском сайте anaschu 02.07.2026 Как подружиться с AnyLogic Cloud API, победить провайдеров и развернуться Java-бэкенд в Docker на бесплатном хостинге: Двухдневный лог борьбы Всем привет! Хочу поделиться свежим (и довольно. . .

@scorpionid 0 / 0 / 0 Регистрация: 12.01.2018 Сообщений: 23
	19.10.2018, 17:23 [ТС]
	спасибо большое Добавлено через 18 минут мне не очень понятно, что значит i == 0? 0

@scorpionid 0 / 0 / 0 Регистрация: 12.01.2018 Сообщений: 23
	19.10.2018, 18:08 [ТС]
	и еще, что такое nummax, просто дополнительная переменная? 0

@scorpionid 0 / 0 / 0 Регистрация: 12.01.2018 Сообщений: 23
	19.10.2018, 18:19 [ТС]
	nummax же по сути ничего не делает можно вроде и без него , так ? 0

@stu4ent2018 Заблокирован
	19.10.2018, 19:10
	Попробуй и узнаешь. 0