→ Для вступления в общество новичков и профессионалов программирования, пожалуйста нажмите здесь ...

Форум программистов: C++, Basic, Delphi, Pascal, JavaScript
Логин: Пароль:
Запомнить?  
@Mail.ru



Начать новую тему Ответить на тему  [ 1 сообщение ] 
выдает такой еррор [C++ Error] Unit2.cpp(39): E2040 Declarat 
Автор Сообщение
Начинающий

Регистрация: 14.12.2011
Сообщения: 1
Языки:
Специальность:

Репутация: 0 [ ? ]
Сообщение выдает такой еррор [C++ Error] Unit2.cpp(39): E2040 Declarat
а если убираю { то появляется множество ошибок, помогите понять что это за аошибки
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <math.h>
#include <iostream.h>
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
int kol;
//??????? ????????
void mass();
void mass(TStringGrid *SG)

{
float min;
int j,q,i;
{
min=60000;
for(int j=1; j<SG->RowCount;j++)
{
for(int i=1;i<SG->ColCount;i++)
{
if (j!=i)
if (SG->Cells[j][i]!="x")
if (min>StrToInt(SG->Cells[j][i]))
{ min=StrToInt(SG->Cells[j][i]);
q=j;
}
}
}
min=q;
//ShowMessage(IntToStr(min));
} }
//???????? ??????????? ????
void Alg2();
{
int d,i,j;

bool prov[10];
string s;
string sum1;

//?-??? ???????
void main();
void proval();
bool f=false;
for ( int j=1; j<SG->CoolCount; j++ );
for (int i=1; i<SG->ColCount;i++) ;
{
f=(f) or (prov[i]);
proval=not(f);
}

for(int j=1; j<SG->CoolCount; j++ )
{ for(int i=1;i<SG->RowCount;i++);
prov[i]=true;
d=1;
s=((SG->Cells[0][1])+("->"));
sum1=0;
prov[1]=false;
repeat
s=s+(SG->Cells[0][min(d)])+("->");
if (SG->Cells[d][min(d)]='x') sum1=sum1+0;
else
if sum1=sum1+StrToInt(SG->Cells[d][min(d)];
d=min(d);
prov[d]=false;
until proval;
sum1=sum1+StrToInt(SG->Cells[d][1]);
memo1->clear;
memo1->Lines->Add(' ');
memo1->Lines->add("iaeaaiue ioou"+s);
memo1->Lines->add("aeeia iooe="+IntToStr(sum1));
}

//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm2::Button3Click(TObject *Sender)
{
exit(2);
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
int i,n,j;
{
n=StrToInt(Edit1->Text);
SG->ColCount=n+1;
SG->RowCount=n+1;
kol=n;
for (int i=1; i<n; i++);
for (int j=1; j<n; j++);
{
SG->Cells[0][i]=IntToStr(i);
SG->Cells[i][0]=IntToStr(i);
SG->Cells[i][i]='-';
SG->Cells[0][j]=IntToStr(j);
SG->Cells[j][0]=IntToStr(j);
SG->Cells[j][j]='-';
}
}
}
//---------------------------------------------------------------------------

void __fastcall TForm2::Button4Click(TObject *Sender)
{
for(int i = 0; i < SG->ColCount; i++)
for(int j = 0; j < SG->RowCount; j++)
SG->Cells[i][j] = "";
}
//---------------------------------------------------------------------------


14.12.2011 3:55
Профиль Отправить email
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ 1 сообщение ] 


Кто сейчас на конференции

Зарегистрированные пользователи: нет зарегистрированных пользователей


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
© 2013 «Форум программистов Украины»