Не возвращает правильный ответ

@Миушник · Регистрация: 03.12.2010

Студворк — интернет-сервис помощи студентам

цвет.rar подскажите вроде все правильно написано, но правильный ответ выдавать не хочет посмотрите.

@BRcr · 19.03.2013, 15:48

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
void __fastcall TForm1::Button2Click(TObject *Sender)
{  int k;
 
Form1->Button1->Enabled=false;
Form1->Button1->Enabled=true;
if (k==3)
ShowMessage("Mолодец 3 правильных ответа");
if ((Panel1->Visible==true) && (Edit1->Text==Panel1->Hint))
{ShowMessage("Pravulbno") ;
k++; return;}
else
{ShowMessage(" Ne Pravulbno") ;
k=0; return;}
if ((Panel2->Visible==true) && (Edit1->Text==Panel2->Hint))
{ShowMessage("Pravulbno") ;
k++;}
else
{ShowMessage(" Ne Pravulbno") ;
k=0;}
if ((Panel3->Visible==true) && (Edit1->Text==Panel3->Hint))
{ShowMessage("Pravulbno") ;
k++;}
else
{ShowMessage(" Ne Pravulbno") ;
k=0;return;}
if ((Panel4->Visible==true) && (Edit1->Text==Panel4->Hint))
{ShowMessage("Pravulbno") ;
k++;}
else
{ShowMessage(" Ne Pravulbno") ;
k=0;return;}
if ((Panel5->Visible==true) && (Edit1->Text==Panel5->Hint))
{
ShowMessage("Pravulbno") ;
k++;}
else
{
ShowMessage(Edit1->Text);
ShowMessage(Panel5->Hint);
ShowMessage(" Ne Pravulbno") ;
k=0;return;}
}

Переменная k здесь локальная и при каждом вызове метода создается заново, причем еще и не инициализируется - неудивительно, что if (k==3) никогда не отрабатывает.

@Миушник · 20.03.2013, 00:43 **[ТС]**

как это можно поправить??

@Sameman · 20.03.2013, 01:58

Ну, наверное префикс global в объявлении переменной добавить? А если нет его - так написать, чтобы был и можно было обозначать любую переменную глобальной. А не за скобки куда-то непонятно её выносить, где она совсем не нужна...

@BRcr · 20.03.2013, 02:36

Так, например:

C++
1
2
3
4
5
6
7
static int k( 0 );
// ...
if ( k == 3 ) {
    ShowMessage("Mолодец 3 правильных ответа");
    k = 0;
}
// ...

@Миушник · 20.03.2013, 08:34 **[ТС]**

ребята не знаю все ровно правильный ответ не выдает при правильно введенных цифрах.=(

@BRcr · 23.03.2013, 12:37

В твоем коде разбираться ни малейшего желания, глупая реализация, увы.

А вот примерчик мой можешь поглядеть, авось, и разберешься.
Экзешник - Project1.rar

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
#include <map>
// ---------------------------------------------------------------------------
class TForm1
               : public TForm
{
__published: // IDE-managed Components
    TButton *btn_start;
    TTimer *tmr_shapes_hide;
    TEdit *edit_ans;
    TButton *btn_check;
    TEdit *edit_timeout;
    TLabel *lbl_timeout;
    TCheckBox *chbox_hint;
    void __fastcall btn_startClick( TObject *Sender );
    void __fastcall tmr_shapes_hideTimer( TObject *Sender );
    void __fastcall btn_checkClick( TObject *Sender );
    void __fastcall FormPaint( TObject *Sender );
    void __fastcall chbox_hintClick( TObject *Sender );
private: // User declarations
public:  // User declarations
    __fastcall TForm1( TComponent *Owner );
    std::map <int, TShape*> example_shapes, test_shapes;
    String answer;
};

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
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
__fastcall TForm1::TForm1( TComponent *Owner )
               : TForm( Owner )
{
    TShape *sh;
    for ( int i = 1; i <= 11; ++i ) {
        sh = new TShape( this );
        sh->Parent = this;
        sh->Name = "example_shape_" + IntToStr( i );
        sh->Shape = stRoundRect;
        sh->Width = 40;
        sh->Height = 40;
        sh->Top = btn_start->Top + btn_start->Height * 2;
        sh->Left = 50 * i - 40; // эквивалент: 10 * i + ( i - 1 ) * 40
        example_shapes[i] = sh;
    }
    example_shapes[1]->Brush->Color = clRed;
    example_shapes[2]->Brush->Color = clLime;
    example_shapes[3]->Brush->Color = clYellow;
    example_shapes[4]->Brush->Color = clBlue;
    example_shapes[5]->Brush->Color = clFuchsia;
    example_shapes[6]->Brush->Color = clAqua;
    example_shapes[7]->Brush->Color = clBlack;
    example_shapes[8]->Brush->Color = clWhite;
    example_shapes[9]->Brush->Color = clMaroon;
    example_shapes[10]->Brush->Color = clPurple;
    example_shapes[11]->Brush->Color = clGray;
 
    for ( int i = 1, top = example_shapes[1]->Top + example_shapes[1]->Height * 2; i <= 5; ++i ) {
        sh = new TShape( this );
        sh->Parent = this;
        sh->Name = "test_shape_" + IntToStr( i );
        sh->Shape = stCircle;
        sh->Width = 65;
        sh->Height = 65;
        sh->Top = i == 3 || i == 4 ? top += sh->Height - 10 : top;
        sh->Visible = false;
        test_shapes[i] = sh;
    }
    test_shapes[1]->Left = 200;
    test_shapes[2]->Left = 300;
    test_shapes[3]->Left = 250;
    test_shapes[4]->Left = 200;
    test_shapes[5]->Left = 300;
 
    this->ClientWidth = example_shapes[11]->Left + 100;
    this->ClientHeight = test_shapes[5]->Top + 100;
    edit_timeout->Text = IntToStr( 10 );
 
    srand( time( NULL ) );
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::btn_startClick( TObject *Sender ) // старт
{
    int time( 10 );
    if ( !TryStrToInt( edit_timeout->Text, time ) || time > 15 || time < 5 ) {
        ShowMessage( "введите верный интервал в пределах 5-15 сек" );
        return;
    }
    edit_ans->Text = answer = "";
    for ( int i = 1, color; i <= test_shapes.size( ); ++i ) {
        test_shapes[i]->Visible = true;
        test_shapes[i]->Brush->Color = example_shapes[color = ( rand( ) % ( example_shapes.size( ) - 1 ) ) + 1]->Brush->Color;
        answer += IntToStr( color ) + " ";
    }
    if ( chbox_hint->Checked ) {
        Caption = answer;
    }
    else {
        Caption = Name;
    }
    tmr_shapes_hide->Interval = time * 1000;
    tmr_shapes_hide->Enabled = true;
    btn_check->Enabled = true;
    Refresh( );
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::tmr_shapes_hideTimer( TObject *Sender )
{
    for ( int i = 1; i <= test_shapes.size( ); ++i ) {
        test_shapes[i]->Visible = false;
    }
    tmr_shapes_hide->Enabled = false;
    Refresh( );
}
// ---------------------------------------------------------------------------
 
void __fastcall TForm1::btn_checkClick( TObject *Sender ) // проверка
{
    static int count( 0 );
    if ( answer.Trim( ) == edit_ans->Text.Trim( ) ) {
        ShowMessage( "верный ответ" );
        ++count;
    }
    else {
        ShowMessage( "неверный ответ (не забываем числа вводить через пробел, раз уж у нас 11 значений цвета)" );
        count = 0;
    }
    if ( count == 3 ) {
        ShowMessage( "три верных подряд" );
        count = 0;
    }
    btn_check->Enabled = false;
    edit_ans->Text = answer = "";
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::FormPaint( TObject *Sender )
{
    TShape *sh;
    for ( int i = 1; i <= example_shapes.size( ); ++i ) {
        sh = example_shapes[i];
        this->Canvas->TextOut( sh->Left + 15, sh->Top + sh->Height + 10, IntToStr( i ) );
    }
    for ( int i = 1; i <= test_shapes.size( ) && ( test_shapes[1]->Visible ); ++i ) {
        sh = test_shapes[i];
        this->Canvas->TextOut( sh->Left + 30, sh->Top + sh->Height + 10, IntToStr( i ) );
    }
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::chbox_hintClick( TObject *Sender )
{
    if ( chbox_hint->Checked ) {
        Caption = answer;
    }
    else {
        Caption = Name;
    }
}

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@Миушник 68 / 60 / 18 Регистрация: 03.12.2010 Сообщений: 365

	Не возвращает правильный ответ 19.03.2013, 12:11. Показов 855. Ответов 6 Метки нет (Все метки) цвет.rar подскажите вроде все правильно написано, но правильный ответ выдавать не хочет посмотрите. 0

@Миушник 68 / 60 / 18 Регистрация: 03.12.2010 Сообщений: 365
	20.03.2013, 00:43 [ТС]
	как это можно поправить?? 0

@Sameman 1 / 1 / 0 Регистрация: 12.07.2012 Сообщений: 46
	20.03.2013, 01:58
	Ну, наверное префикс global в объявлении переменной добавить? А если нет его - так написать, чтобы был и можно было обозначать любую переменную глобальной. А не за скобки куда-то непонятно её выносить, где она совсем не нужна... 1

@Миушник 68 / 60 / 18 Регистрация: 03.12.2010 Сообщений: 365
	20.03.2013, 08:34 [ТС]
	ребята не знаю все ровно правильный ответ не выдает при правильно введенных цифрах.=( 0