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

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

Войти
Регистрация
Восстановить пароль
 
Lil Crazy
5 / 5 / 1
Регистрация: 23.03.2009
Сообщений: 198
#1

Портирование - C++

14.04.2009, 23:10. Просмотров 499. Ответов 5
Метки нет (Все метки)

Доброго времени суток Помогите пожалуйста с портирование задаси на яп си. Код мой на паскале:
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
uses crt;
var X: array[1..50,1..35] of longint;
    K,L,i,j,max_j,min_j,buf,A,B:integer;
begin
  clrscr;
 
  writeln('Здравствуйте, уважаемый пользователь!');
  writeln('Эта программа в каждом столбце меняет местами наибольший и наименьший по модулю элементы.');
 
  repeat
    write('Введите количество строк матрицы K (0<K<=50) ');
    readln(K);
      if (K<=0)or(K>50) then writeln('Вы осуществили неправильный ввод. Попробуйте ввести К ещё раз...');
  until (K>0)and(K<=50);
 
  repeat
    write('Введите количество столбцов матрицы L (0<L<=35) ');
    readln(L);
      if (L<=0)or(L>35) then writeln('Вы осуществили неправильный ввод. Попробуйте ввести L ещё раз...');
  until (L>0)and(L<=35);
 
  for i:=1 to K do
    for j:=1 to L do
      begin
        write('Введите элемент [',i,',',j,'] ');
        readln(X[i,j]);
      end;
 
  writeln('Вы ввели такую исходную матрицу:');
  for i:=1 to K do
    begin
      for j:=1 to L do
        write(X[i,j]:4,' ');
        writeln;
    end;
 
  for j:=1 to L do
    begin
      max_j:=X[1,i];
      min_j:=X[1,i];
      for i:=1 to K do
        begin
          if abs(X[i,j])>=max_j then
            begin
              max_j:=abs(X[i,j]);
              A:=i;
            end;
          if abs(X[i,j])<=min_j then
            begin
              min_j:=abs(X[i,j]);
              B:=i;
            end;
         end;
       buf:=X[A,j];
       X[A,j]:=X[B,j];
       X[B,j]:=buf;
     end;
 
  writeln('В итоге, получили матрицу:');
  for i:=1 to K do
    begin
      for j:=1 to L do
        write(X[i,j]:4,' ');
        writeln;
     end;
  readkey;
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.04.2009, 23:10     Портирование
Посмотрите здесь:

С++ портирование C++
C# Портирование С++ -> С#
Портирование кода на С++ (проверка вводимых данных пользователем на корректность) C++
Портирование кода с С# на С++ C++
C++ портирование
Портирование на Андроид Android
C++ Портирование из Visual Studio 2008 в Eclipse
Портирование из Qt в С++ C++ Qt
Портирование кода C++
Портирование программы с Linux на Windows C++
C++ Портирование проекта под android на ios

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Викдон
67 / 67 / 4
Регистрация: 21.11.2008
Сообщений: 226
15.04.2009, 00:15     Портирование #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
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
70
71
72
73
74
75
76
77
78
79
#include "stdafx.h"
#include "iostream"
using namespace std;
 
 const int n=3, m=4;
 
int _tmain(int argc, _TCHAR* argv[])
 
{  long int X[50][35];
    int K,L,A,B;
    int min_j,max_j,buf;
 
    cout<<"'Здравствуйте, уважаемый пользователь!";
    cout<<"'Эта программа в каждом столбце меняет местами наибольший и наименьший по модулю элементы.";
    
    while (true){ 
     cout<<"Введите количество строк матрицы K (0<K<=50) ";
     cin>>K;
        if ((K<0) || (K>50)) 
         cout<<"Вы осуществили неправильный ввод. Попробуйте ввести К ещё раз...";
        else
         break;
    }
 
    while (true){ 
     cout<<"Введите количество столбцов матрицы L (0<L<=35)";
     cin>>L;
        if ((L<0) || (L>35)) 
         cout<<"'Вы осуществили неправильный ввод. Попробуйте ввести L ещё раз...";
        else
         break;
    }
 
    for(int i=0;i<K;i++)
        for(int j=0;j<L;j++){
            cout<<"Введите ["<<i<<","<<j<<"] элемент: ";
            cin>>X[i][j];
        }
 
    cout<<"Вы ввели такую исходную матрицу:";
    for(int i=0;i<K;i++){
        cout<<"|";
        for(int j=0;j<L;j++){
          cout<<X[i][j]<<" ";
        }
        cout<<"|"<<endl;
    }
 
 
    for (int j=0;j<L;j++){
      min_j=X[0][j];
      max_j=X[0][j];
       for(int i=0;i<K;i++){
          if (abs(X[i][j])>=max_j){
              max_j=abs(X[i][j]);
              A=i;
          }
 
          if (abs(X[i][j]<=min_j)){
             min_j=abs(X[i][j]);
             B=i;
          }
       }
       buf=X[A][j];
       X[A][j]=X[B][j];
       X[B][j]=buf;
 
    }
             cout<<"В итоге, получили матрицу:"<<endl;
    for(int i=0;i<K;i++){
      cout<<"|";
        for(int j=0;j<L;j++){
          cout<<X[i][j]<<" ";
        }
        cout<<"|"<<endl;
    }
             cin>>A;
    return 0;
}
Lil Crazy
5 / 5 / 1
Регистрация: 23.03.2009
Сообщений: 198
15.04.2009, 14:33  [ТС]     Портирование #3
А что это за ошибка???
HTML5
1
2
3
4
5
6
7
--------------------Configuration: KKR - Win32 Debug--------------------
Compiling...
KKR.cpp
h:\documents and settings\lil crazy\Г°Г*áî÷èé ñòîë\Г*îâГ*Гї ГЇГ*ГЇГЄГ*\kkr.cpp(1) : fatal error C1083: Cannot open include file: 'stdafx.h': No such file or directory
Error executing cl.exe.
 
KKR.obj - 1 error(s), 0 warning(s)
Я компилил в Microsoft Visual C++ 6.0, а надо в Visual Studio 2008?
RazorQ
576 / 343 / 9
Регистрация: 06.02.2009
Сообщений: 1,386
15.04.2009, 14:38     Портирование #4
убери строчку #include "stdafx.h"
Lil Crazy
5 / 5 / 1
Регистрация: 23.03.2009
Сообщений: 198
15.04.2009, 16:24  [ТС]     Портирование #5
А на чём вы компилировали?

Добавлено через 46 минут 40 секунд
Не работает
Викдон
67 / 67 / 4
Регистрация: 21.11.2008
Сообщений: 226
15.04.2009, 18:24     Портирование #6
я компилил на Microsoft Visual Studio 2005
Yandex
Объявления
15.04.2009, 18:24     Портирование
Ответ Создать тему
Опции темы

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