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

Объектно-ориентированное программирование - C++

Восстановить пароль Регистрация
 
Елена ))
 Аватар для Елена ))
-2 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 67
18.05.2011, 10:11     Объектно-ориентированное программирование #1
Составить описание класса одномерных массивов строк, каждая строка которых задается длиной и указателем на выделенную для нее память. Предусмотреть возможность обращения к отдельным строкам массива по индексам, контроль выхода за пределы индексов, выполнения операций поэлементного сцепления двух массивов с образованием нового массива, слияния двух массивов с исключением повторяющихся элементов, печать (вывод на экран) элементов массива и всего массива.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
LineStown
18.05.2011, 10:13
  #2

Не по теме:

совесть включить нужно!

mimicria
return (true);
 Аватар для mimicria
1956 / 1093 / 91
Регистрация: 19.04.2011
Сообщений: 2,344
18.05.2011, 10:38     Объектно-ориентированное программирование #3
Цитата Сообщение от LineStown Посмотреть сообщение
совесть включить нужно!

Не по теме:

Задания розданы, можно ничего не делать

Елена ))
 Аватар для Елена ))
-2 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 67
24.05.2011, 10:08  [ТС]     Объектно-ориентированное программирование #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
#include "stdafx.h"
#include <stdio.h>
#include <math.h>
#include <stdlib.h>
#include <conio.h>
#include <tchar.h>
#include <iostream>
#include <windows.h>
using namespace std;
 
class Str
{
public:
    char* s;
    int len;
    Str()
    {
        len = 0;
        s = new char[0];
    }
    void SetLength(int Length)
    {
        if (Length<1) return;
        s = new char[Length];
    }
};
 
 
 
class StrList
{
public:
    Str* ArrSt;
    int count;
    StrList()
    {
        this->count = 0;
    }
 
    void Add(char* str)
    {
        int i=0;
        for(i=0;str[i]!='\0';i++);
        count++;
        ArrSt = new Str[count];
        ArrSt[count-1].len = i;
        ArrSt[count-1].SetLength(i);
        ArrSt[count-1].s = str;
    }
 
    char* GetStr(int index)
    {
        if (index<0 || index > count-1) return "ERROR INDEX";
        return ArrSt[index].s;
    }
 
    void PrintStr(int index)
    {
        if (index<0 || index > count-1) return;
        cout << endl << ArrSt[index].s << endl;
    }
 
    void ChangeStr(int index, char* NewStr)
    {
        if (index<0 || index > count-1) return;
        int i=0;
        for(i=0;NewStr[i]!='\0';i++);
        ArrSt[index].SetLength(i);
        ArrSt[index].s = NewStr;
    }
 
    void PrintAll()
    {
        cout << endl;
        for (int i=0; i<count; i++)
        {
            cout << ArrSt[i].s << endl;
        }
    }
};
 
void StrConnect(StrLis List1, StrList List2)
{
 
}
 
int _tmain(int argc, _TCHAR* argv[])
{   
    StrList My;
    char* ch=new char[256];
    cin >> ch;
    My.Add(ch);
    ch = "Amid";
    My.Add(ch);
    My.PrintAll();
    return 0;
}
Добавлено через 2 минуты
Не понимаю почему она не работает
Елена ))
 Аватар для Елена ))
-2 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 67
25.05.2011, 10:21  [ТС]     Объектно-ориентированное программирование #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
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
program hgft;
type
   TMassiv=Object
        mas:array[1..100] of String;
        ind:integer;
         procedure index(i:integer);
         procedure dl(d:integer);
         Procedure Sceplenie(a,a1:array  of String);
         Procedure slijanie(a,a1:array of String);
 
   end;
   var
     k,l:integer;
   q:boolean;
   i1,j:integer;
   s:string;
   as:array [1..200] of string;
   a,a1:tmassiv;
     procedure a.dl(d:integer);
 
         begin
         For I1:= 1 to 100 do
         begin
         j:=1;
         while j<=d do
          begin
         s:='a' ;
          inc(j) ;
         end;
            a.mas[i1]:=S;
            a1.mas[i1]:=s;
         end;
         end;
         procedure a.index(i:integer);
        begin
          writeln(a.mas[i]);
           writeln(a1.mas[i]);
     end;
             Procedure a.Sceplenie(a,a1:array  of String);
                begin
                 for i1:=1 to 100 do
                  begin
                    a[i1]:=a[i1]+ a1[i1];
                    write(a[i1]);
                    end;
 
                 end;
                     Procedure a.slijanie(a,a1:array of String);
 
                     begin
                     q:=true;
                     l:=1;
                 for i1:=1 to 100 do
                  begin
                    as[i1]:=a[i1];
 
                   end;
 
                   for i1:=101 to 200 do
                  begin
                  for k:=1 to 100
                  begin
                  if as[k]=a[i1]  then
                  begin
                  q:=false;
                  break;
                   end;
                    end;
                    If q<>false then
                    as[i1] :=a1[l] ;
                    inc(l);
                   end;
 
                 end;
     begin
      Writeln ('Vvedite dlinu stroki');
      readln(d);
      Writeln('Vvedite index stroki');
      readln(p);
      a.dl(m);
     a.index(p);
     a.Sceplenie(a.mas,a1.mas);
      a.Slijanie(a.mas,a1.mas);
     end.
Добавлено через 1 минуту
Помогите,пожалуйста, перевести в С++
Yandex
Объявления
25.05.2011, 10:21     Объектно-ориентированное программирование
Ответ Создать тему
Опции темы

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