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

Форум программистов: 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 сообщение ] 


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

Зарегистрированные пользователи: Google [Bot]


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

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