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

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

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

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

02.04.2013, 20:07. Просмотров 196. Ответов 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.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.04.2013, 20:07     Перевести
Посмотрите здесь:

Перевести в С++ - C++
Помогите пожалуйста перевести на С++ function x(i: integer): real; begin x := i / (i + sqrt(i)) end; function y(k:...

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

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

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

Перевести из с в с++ - C++
#include <stdlib.h> #include <stdio.h> #include <locale.h> int main() { setlocale(LC_ALL,"r"); int i,n; long int...

Перевести из Си в С++ - C++
#include "stdafx.h" #include <stdio.h> #include <stdlib.h> #include <string.h> int check (char str) { int i,length; ...

перевести на С - C++
uses crt; const zag= ' student kotorie pribuli '; line='-----------------------------------------|'; shap='| ...

Перевести с с# на с++ - C++
using System; using System.Collections; using System.Collections.Generic; using System.Linq; using System.Text; using System.IO; ...

Перевести с С на С++ - 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...


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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

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