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

перевести с С на паскаль - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ подскажите как выполнить метод в потоке http://www.cyberforum.ru/cpp-beginners/thread382892.html
class T1 { public : void metod1(); void metod2(); } void T1::metod1() { std::cout<<"metod1"<<endl; // пожскажите пожайлуста как в этом методе запустить metod2 в отдельном потоке
C++ Как правильно прикрепить файл ".h" к проекту? Хочу перекинуть структуры в один файл, функции в другой, а основная программа останется в cpp. Для этого добавляю к проекту файлы ".h" и в .cpp пишу: #include "Structure.h" #include "Functions.h" . Вроде ничего не подчеркивает, а при запуске выдает море ошибок. Подскажите пожалуйста - как правильно сделать? http://www.cyberforum.ru/cpp-beginners/thread382869.html
C++ Одномерные массивы.
Большая просьба помочь мне в решении двух задач! Буду Вам очень признателен, товарищи! задачи выглядят следующим образом: 1. Сформировать новый массив из элементов массива М(25), встречающихся в этом массиве только один раз. 2. Определить, представляют ли собой элементы массива А(20) возрастающую последовательность. Буду очень рад вашему развернутому ответу!)
C++ Блок-схема
Привет, можете помочь сделать блок-схему алгоритма этой проги? заранее огромное спасибо)) #include <math.h> #include <stdio.h> int main() { double a,b,x,c,F,Xn,Xk,dX; printf("Enter Xn, Xk, dX, a, b, c:\n"); scanf("%lf%lf%lf%lf%lf%lf", &Xn, &Xk, &dX, &a, &b, &c); printf("___________________________\n");
C++ Найти пару наиболее различающихся слов из 5 букв http://www.cyberforum.ru/cpp-beginners/thread382849.html
Расстояние между двумя словами разной длины - это кол-во позиций,в которых различаются эти слова.В заданном предложении найти пару наиболее различающихся слов состоящих из 5 букв. Помогите решить,пожалуйста.
C++ для заданного текста определить длину содержащейся в нём максимальной последовательности символов, отличных от букв. заранее спасибо подробнее

Показать сообщение отдельно
Koo
0 / 0 / 0
Регистрация: 22.04.2010
Сообщений: 38

перевести с С на паскаль - C++

13.11.2011, 13:56. Просмотров 393. Ответов 4
Метки (Все метки)

Переведете пожалуйста код с С++ на паскаль. Очень нужно!
Программа должна удалять лишние элементы в последовательности, так, чтобы после их удаления образовалась максимальная последовательность.
Если можно,то главный алгоритм (((.
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
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
#include "stdafx.h"
#include "stdio.h"
#include "conio.h"
#include <stdlib.h>
#include "time.h"
 
 
int _tmain(int argc, _TCHAR* argv[])
{
int i,g,n=0,m=0,  answ=0, *kolvo_elementov_bolshih_dannogo ;
while (n<=0)
    {
        printf("Vvedite kol-vo elenentov v massive :" );
        scanf("%d",&n);
}
   
    kolvo_elementov_bolshih_dannogo = new int [n];
    int* arr = new int [n];
 
    while (!((answ==1) || (answ==2)))
    {
        printf("Zadat elementi sluchaino?(1/2) ");
        scanf("%d",&answ);
    }
    for (i=0; i<n; i++)
    {
        if (answ==1)
        {
        printf("Vvedite %d elenenti = ",i+1);
        scanf("%d", &arr[i]);
        }
          else
        {
            arr[i]=rand();
            printf("%d : %d\n", i+1,arr[i]);
        }
    
    }
    
            
 int *element_iskomoi_posledovatelnosti;
 int tempNum = 1;
element_iskomoi_posledovatelnosti = new int [maxim];
   
    int k=index_pervogo_elementa_posledovatelnosti;
    element_iskomoi_posledovatelnosti[0]=arr[k];
    printf(" element_iskomoi_posledovatelnosti[%i]=%i\n ",1, element_iskomoi_posledovatelnosti[0]);
 
    for (int j=index_pervogo_elementa_posledovatelnosti; j< n ; j++ )
    if (arr[k]<arr[j]) 
    {
       element_iskomoi_posledovatelnosti[tempNum]=arr[j];
       printf(" element_iskomoi_posledovatelnosti[%i]=%i\n ",tempNum+1, element_iskomoi_posledovatelnosti[tempNum++]);
       k=j;
     }
 
}
 
      int index_pervogo_elementa_posledovatelnosti, maxim;
       
           for (int i=0; i<n;i++)
         
maxim =  kolvo_elementov_bolshih_dannogo[0];
index_pervogo_elementa_posledovatelnosti = 0;
 for(i=1; i<n; ++i)
 {
     if(maxim < kolvo_elementov_bolshih_dannogo[i])
     {
          maxim = kolvo_elementov_bolshih_dannogo[i];
      index_pervogo_elementa_posledovatelnosti=i;    
     }   
  }   
   
  printf("Max of elements = %d\n", maxim);
  printf("index_pervogo_elementa_posledovatelnosti= %d\n", index_pervogo_elementa_posledovatelnosti);
 
index_pervogo_elementa_posledovatelnosti);
          
 
int *iskomaya_posledovatelnost;
         for (int i=0; i<n;i++)
     {
               int p,o,e, w = index_pervogo_elementa_posledovatelnosti;
               p=n-w;
               o=w+1;
               for (int e =w; e< p ; e++ )
 
 
              iskomaya_posledovatelnost = new int [p];
  
              if (arr[e]<arr[o]) 
              {   iskomaya_posledovatelnost[e]=arr[w];
               ++e; 
               ++o;
               printf("iskomaya_posledovatelnost=%d\n ", e);
    
    }
 
         }
    
getch();
return 0;
}
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru