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

задание по курсовой.в с++ особо не соображаю. исправьте пожалуйста ошибки,хотя бы те,которые видимы сразу - C++

Восстановить пароль Регистрация
 
olol
Сообщений: n/a
26.05.2012, 17:11     задание по курсовой.в с++ особо не соображаю. исправьте пожалуйста ошибки,хотя бы те,которые видимы сразу #1
void __fastcall TForm5::Button4Click(TObject *Sender)
{
int min,i,kfor,n;
file f1;
char *s;
f1=fopen("Temp","wt");
n=Memo1->Lines->Count-1;
for (i=0;i< n;i++)
{
s=Memo1->Lines->Strings[i].c_str;
{
min=strlen(s)+1;
kfor=posstr(s,';');
if ((kfor>-1) && (min>kfor))
min=kfor;
kfor=posstr(s,'{');
if ((kfor>-1) && (min>kfor))
min=kfor;
kfor=posstr(s,'}');
if ((kfor>-1) && (min>kfor))
min=kfor;
kfor=posstr(s,')');
if ((kfor>-1) && (min>kfor))
min=kfor;
if (min==strlen(s)+1)
fprintf(f1,"%s",s);
else
{
fprintf(f1,"%s\n",copystr(s,1,min));
s=copystr(s,min+1,strlen(s)-min);
}
}
while (min!=strlen(s)+1);
}
fclose(f1);
Memo->Lines->LoadFromFile("temp.txt");
Memo1->Lines->SaveToFile("temp.txt");

}
//---------------------------------------------------------------------------

void __fastcall TForm5::Button5Click(TObject *Sender)
{ char *kn,*kb,*per,*s,*s2;
file f1,f2;
int min,i,kfor,keq,kto,kdo,n;
f1=fopen("Temp","rt");
f2=fopen(fn2,"wt");
n=Memo1->Lines->Count-1;
for (i=0;i< n;i++)
{
s=Memo1->Lines->Strings[i].c_str;
/*Определяем положение for*/
kfor=strstr(s,"for")-s;
if (kfor>-1)
{
/*Определяем положение :=*/
keq=strstr(s,":=")-s;
if ((keq>-1) && (keq>kfor+1))
{
/*Определяем положение to*/
kto=strstr(s,"to")-s;
if ((kto>-1) && (kto>keq+1))
{
/*Определяем положение do*/
kdo=strstr(s,"do")-s;
if ((kdo>-1) && (kdo>kto+1))
{
fl=1;
/*Выделяем переменную цикла*/
per=copystr(s,kfor+4,keq-kfor-4);
/*Выделяем начальное значение*/
kn=copystr(s,keq+2,kto-keq-3);
/*Выделяем конечное значение*/
kb=copystr(s,kto+3,kdo-kto-4);
/*Формируем while*/
fprintf(f2,"%s:=%s-1;\n",per,kn);
fprintf(f2,"while %s<%s do\n",per,kb);
fscanf(f1,"%s",s2);
/*Если у while есть {*/
if (strstr(s2,"begin")-s2>-1)
{
fprintf(f2,"%s",s2);
fprintf(f2,"%s:=%s+1;\n",per,per);
}
else
{
fprintf(f2,"begin\n");
fprintf(f2,"%s:=%s+1;\n",per,per);
fprintf(f2,"%s",s2);
fprintf(f2,"end;\n");
}
}
}
}
}
}
fclose(f2);
fclose(f1);
}
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.05.2012, 17:11     задание по курсовой.в с++ особо не соображаю. исправьте пожалуйста ошибки,хотя бы те,которые видимы сразу
Посмотрите здесь:

Исправьте пожалуйста ошибки C++
Массивы(исправьте ошибки) C++
C++ исправьте ошибки в коде
Ребята, . пожалуйста! Вот текстовые программы. Вообще в строках не соображаю, прошу о .! программы на С++ C++
Исправьте ошибки! задание само: массив из 20 чисел случайных (функция random) вывести минимальное C++
Исправьте ошибки C++
C++ исправьте ошибки в задаче пожалуйста

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

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