Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Помогите ПЛИЗ с написанием программы в C++Builder, Не могу разобраться со своей программной 
:(
    Опции темы
AgainstAllSenses
Дата 9.2.2010, 00:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 8.2.2010

Репутация: нет
Всего: нет



Привет всем. 
У меня возникла проблема при написании программы , в C++ Builder 6. Мне нужно написать программу "двухпутевое слияние по алгоритму S".
Суть программы : В програму задан массив , заданы элементы массива . есть 2 элемента на Form(е) -Кнопка Button1 и окно вывода ListBox1 .
При нажатии на кнопку происходит двухпутевое слияние и на площадь ListBox1 выдается уже отсортированные элементы массива . Суть алгоритма S , заключается в : В исходной виде все отрезки имеют длину 1, после первого шага она равна 2,  после второго 4, после третьего - 8, после к-го шага - 2 в степени к .
Если кто-то делал эту программу или может сделать помогите пожалуйста , сдать программу нужно через день а у меня с ней ступор..Если кто-то может помочь , Очень прошу...
 Заранее спасибо за ОтВеты!
PM MAIL   Вверх
Данкинг
Дата 9.2.2010, 01:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



В чём именно вопрос-то?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
AgainstAllSenses
Дата 9.2.2010, 03:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 8.2.2010

Репутация: нет
Всего: нет



Цитата(Данкинг @ 9.2.2010,  01:09)
В чём именно вопрос-то?

Ну ,я не могу программу сделать(  Пробовал но не получалось почему-то...Вместо результата ноли писало...Мучался-Мучался Но не смог,вот и решил за помошью обратиться!  Программу не могу написать нормальную=(
PM MAIL   Вверх
orthrus
Дата 9.2.2010, 04:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 400
Регистрация: 30.10.2007
Где: г. Усть-Илимск(Ир кутская обл.)

Репутация: 4
Всего: 16



Если хочешь чтоб за тебя написали прогу то обращайся в центр помощи, если хочешь чтоб помогли разобраться и найти ошибку то выкладывай сюда то что сделал

Это сообщение отредактировал(а) orthrus - 9.2.2010, 04:40


--------------------
У того, кто ничего не делает, всегда много помощников.© Л.Н. Толстой
user posted image
PM MAIL ICQ   Вверх
AgainstAllSenses
Дата 9.2.2010, 04:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 8.2.2010

Репутация: нет
Всего: нет



Цитата(orthrus @ 9.2.2010,  04:38)
Если хочешь чтоб за тебя написали прогу то обращайся в центр помощи, если хочешь чтоб помогли разобраться и найти ошибку то выкладывай сюда то что сделал


#include <stdio.h>
#include <conio.h>
#include <iostream>
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}


 int K[20]; = {12, 31, 5, 22, 7, 16, 8, 10};
  

  int main()
{
int d,  p, q, r, i, j, l, k, f, N=8;
bool s=true;

 s=true; p=1;

 do
{
 if (s)
 {
   i=1; j=N; k=N+1; l=2*N;
  }
  else
  {
    k=1; l=N; i=N+1; j=2*N;
   }

 d=1; q=p; r=p;

 found:
 if(K[i] <= K[j])
 {
 k=k+d;
 K[k]=K[i];
 i=i+1;
 q=q-1;
 if(q>0) goto found;

 do
 {
  k=k+d;
  if(k==l)  goto found2;
  K[k]=K[j];
  j=j-1;r=r-1;
   } while (r>0);
  }
  else
  {
   k=k+d;
   K[k]=K[j];
   j=j-1;
   r=r-1;
   if(r>0) goto found;

    do
    {
     k=k+d;
     if(k==l) goto found2;
     K[k]=K[i];
     i=i+1; q=q-1;
      }      while(q>0);
     }
    q=p;r=p;d=-d; f=k; k=l; l=f;
    goto found;
  found2:
  p=p+p;
  if (s) s=false;
  else s=true;
  } while(p<N);


  for (int i=1; i<=N; i++)
   {
    K[i]=K[N+i];
   }
  return 0;
  }
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 int i;

   for (int i=1; i<=8; i++)
  {
    ListBox1->Items->Add(K[i]);
  }

}



Вот то , что я написал , ошибок не находит , НО в окно вывода приходят сплошные ноли а не отсортированый массив ! 
Я не прошу написать мне программу , просто у еня не получается никак вот и сприсил может у кого нить что-то похожее есть...Помогите плиз ! Я не знаю что тут не так =((
PM MAIL   Вверх
smoke_man
Дата 9.2.2010, 08:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 447
Регистрация: 25.1.2007
Где: Рязань

Репутация: 9
Всего: 17



Убери int main, а весь код в ней повесь на обработчик кнопки(button), результат вычисления можно вывести, например, в memo.  

Это сообщение отредактировал(а) smoke_man - 9.2.2010, 08:04


--------------------
0x2b|~0x2b
PM MAIL ICQ GTalk   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.0847 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.