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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
jenya5455
1 / 1 / 0
Регистрация: 07.11.2012
Сообщений: 53
#1

Перевести - C++

02.04.2013, 20:07. Просмотров 197. Ответов 0
Метки нет (Все метки)

1. Дана действительная матрица строк столбцов; упорядочить (переставить) строки матрицы по неубыванию значений первых элементов строк. Воспользоваться методом:
«шейкерной» сортировки.

у мня есть код для шейкерной сортировки на паскале, для столбцов, переведите ПЛЗ на C++ и заместо столбцов сортировать надо строки. СПАСИБО

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
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
    program z3;
    type massiv = array [0..100,0..100] of integer;
     
    var
     n, m, p, i, j:integer;
     mas : array [0..100, 0..100] of integer;
     masSort : array [0..100, 0..100] of integer;
     
    function sort (a:massiv; num:integer; kol:integer): massiv;
    var
     q, w:integer;
    begin
     for q:= 2 to kol do
     begin
      if a[q-1, num]>a[q, num] then
      begin a[0, 0]:= a[q, num];
       w:=q-1;
       while a[w, num]>a[0, 0] do
       begin
        a[w+1, num]:= a[w, num];
        w:= w-1;
       end;
       a[w+1, num]:= a[0, 0];
      end;
     end;
     sort:=a;
    end;
     
    begin
     writeln ('введите n:');
     readln(n);
     
     writeln ('введите m:');
     readln(m);
     
     for i:=1 to n do
      for j:=1 to m do
      begin
       mas[i, j]:=random(10);
       writeln (mas[i, j]);
      end;
     
      for i:=1 to m do
      begin
       mas:=sort(mas, i, m);
      end;
     
     
      for i:=1 to n do
      for j:=1 to m do
      begin
       writeln (mas[i, j]);
      end;
      
     for i:=1 to n do
     begin
      p:=1;
      for j:=1 to m do
      begin
       if mas[j, i] mod 2 = 0 then
       begin
        p:=p*mas[j, i];
       end;
      end;
      masSort[1, i]:=p;
      masSort[2, i]:=i;
     end;
     
    end.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.04.2013, 20:07
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перевести (C++):

Текстовый файл перевести в двоичный, а потом полученный двоичный файл перевести обратно в текстовый - C++
Всем привет. Есть такая задачка: "текстовый файл перевести в двоичный, а потом полученный двоичный файл перевести обратно в текстовый" ...

Перевести с C на C++ - C++
нашёл код C, нужно перевести с C на C++ /*...*/ int z; int z = 42; void foo(x, y) float y, int a; { } хоть я и шарю в...

Перевести на c++ - C++
uses crt; var m,n:integer; mm,mn:set of byte; begin clrscr; repeat writeln('Введите 2 натуральных числа до 9999'); ...

Перевести С++ --> C - C++
Добрый день, уважаемые программисты!!Очень прошу вас о помощи с переаедением программки с С++ на С...

Перевести на С. - C++
Очень нужно перевести на СИ procedure TForm1.Button1Click(Sender: TObject); var a,b,x,i:integer; begin a:=strtoint(Edit1.text); ...

Перевести на C++ - C++
есть прграммы написанные на паскале, помогите пожалуйста перевести их код на C++, вот условия: 1)Написать программу,который вычисляет...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.04.2013, 20:07
Привет! Вот еще темы с ответами:

Перевести из с++ в си - C++
Переведите из c++ в си пожалуйста #include <string> #include <sstream> #include <vector> #include <iostream> using namespace std;...

Перевести с С на С++ - C++
1) Задача #include <stdio.h> #include <conio.h> int main () {clrscr (); char symv = 'A'; char str = "Це стрічка"; const...

Перевести с С на С++ - C++
#include <iostream> void inversion(double **A, int N) { double temp; double **E = new double *; for (int...

Перевести на c++ - C++
Здрасьте. Помогите пожалуйста перевести код в с++ :help: let - константа, а var - переменная var a = 1 + 2 // equals 3 var b =...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru