0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
1

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

19.10.2018, 14:52. Показов 1029. Ответов 25
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Вот код на Паскале :
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++
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.10.2018, 14:52
Ответы с готовыми решениями:

Перевод с паскаля в с++
переводил код с паскаля в с++ и столкнулся с проблемой, помогите разобраться, пожалуйста!...

Перевод с Паскаля на C++
Помогите пожалуйста перевести это код на C++!!!!!! Uses crt,graph; label 2,3,4; Var...

Перевод из паскаля в С++
помогите, пожалуйста, перевести : Program enot; var c, a : integer; begin c:=0; repeat...

Перевод с паскаля в С++
помогите перевести код программы с паскаля в С++, пожалуйста! Program pr1; uses crt; var...

25
Заблокирован
19.10.2018, 14:56 2
Абрамян зачем темы плодишь, тебе ответили же: Найти номер последней из строк матрицы, содержащих максимальное количество одинаковых элементов

Добавлено через 58 секунд
Зачем писать на паскале и потом просить переписать на C++?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 15:21  [ТС] 3
Это не мое решение, я в интернете нашёл и попросил , чтобы перевели. А то решение которое в прошлой записи, мы не проходили так, и я попросил в упрощённом варианте
0
Заблокирован
19.10.2018, 15:30 4
Абрамян, может сам попробуешь?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 15:49  [ТС] 5
Может перестанешь уже писать, если ответа никакого нет,а?
0
Заблокирован
19.10.2018, 15:51 6
Я же ответил . Может сам попробуешь? Почему ты не хочешь этого делать?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:00  [ТС] 7
Я уже сказал, я не знаю как это сделать, поэтому и попросил объяснить
0
Заблокирован
19.10.2018, 16:06 8
Что ты не знаешь как сделать? Простую ничего неделающую программу на С++ написать можешь?

Добавлено через 3 минуты
Опиши шаги, которые надо выполнить и скажи что конкретно непонятно. Например, так:
1. написать ничего не делающую программу на c++;
2. сгенерировать матрицу;
3. найти строку;
4. вывести результат.
Непонятно: 2 и 3.
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:06  [ТС] 9
Ты просто флудишь и никак не помогаешь
0
Заблокирован
19.10.2018, 16:08 10
Цитата Сообщение от scorpionid Посмотреть сообщение
Ты просто флудишь и никак не помогаешь
Абрамян, ты хочешь чтобы всё просто взяли и сделали за тебя? Скажи, что конкретно непонятно.
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:19  [ТС] 11
#include <iostream>
using namespace std;
int main(){
int x[100][100];
int n,m;
cin>>n>>m;
for(int i = 0; i < n; i++){
for(int j = 0; j<m; j++){
cin >> x[i][j];
}
}
дальше после ввода массива я не знаю что писать.
Нужно найти номер последней строки с максимальным количеством одинаковых элементов
0
Заблокирован
19.10.2018, 16:28 12
Цитата Сообщение от scorpionid Посмотреть сообщение
int x[100][100];
Почему 100 на 100, разве такой размер матрицы? Если да, то в цикле всё это вводить будешь наверно долго. Если ручной ввод значений не является обязательным требованием, то можно заполнять случайными числами:
C++
1
x[i][j] = rand();
Добавлено через 1 минуту
Цитата Сообщение от scorpionid Посмотреть сообщение
дальше после ввода массива я не знаю что писать.
Нужно найти номер последней строки с максимальным количеством одинаковых элементов
задачу можно разделить на следующие шаги:
1. научиться находить максимальное число совпадающих элементов в строке;
2. найти нужную строку.
Что здесь непонятно?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:29  [ТС] 13
да нет, просто такой диапазон ввел, потом в цикл вставил, чтобы ввести нужный размер массива
И первое и второе не понятно
0
Заблокирован
19.10.2018, 16:31 14
std::map можно использовать?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:33  [ТС] 15
нет, мы не проходили такое
0
Заблокирован
19.10.2018, 16:34 16
а в матрице хранятся целые числа любые или из какого-то диапазона?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:37  [ТС] 17
любые числа из диапазона 100
0
Заблокирован
19.10.2018, 16:44 18
Функции умеешь писать?
0
0 / 0 / 0
Регистрация: 12.01.2018
Сообщений: 23
19.10.2018, 16:47  [ТС] 19
Ну так, немного
0
Заблокирован
19.10.2018, 16:55 20
Если делать как в твоей версии, то будет примерно так:
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, 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) || (i == 0)) {
            nummax = num;
            rowmax = i;
        }
    }
    
    std::cout << rowmax << "\n";
    
    return 0;
}
0
19.10.2018, 16:55
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.10.2018, 16:55
Помогаю со студенческими работами здесь

Перевод из Паскаля в C++
Переведите программу из Паскаля в С++, пожалусйта Вот код : const nmax=100; var a: array...

Перевод с Паскаля на си++
Помогите перевести на си++. uses crt; const gl=; var s:string; i:byte; begin clrscr;...

Перевод с паскаля на С++
Здравствуйте. Помогите,пожалуйста,перевести код на С++. const n = 67; var matrix: array of...

Перевод с Паскаля на С++
Не могу ни как перевести полностью вот этот кусок кода на Паскале на си++ function h(var key:...


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

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru