Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 12.04.2014
Сообщений: 40
1

Найти одного или нескольких двоичников вывести в StringGrid, если таковых нет то вывести сообщение

20.04.2017, 17:57. Показов 548. Ответов 2
Метки нет (Все метки)

Необходимо изменить условие задачи.....не могу сообразить где поменять условие для вывода двоичников вместо тех студентов у которых "средний бал 4 или 5" это по старому заданию. не помню как пройтись по массиву оценок по предметам, и там где встретиться хоть одна двойка вывести этого студента в стринггрид3... большая часть сделана, остатется самая малость
прикрепил архив с самой программой.
Архив WinRAR (2).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
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
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
#include <memory>
 #include <iostream>
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
int nStud = 0;
const int r = 4; //Кол-во элементов массива
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  StringGrid1->Cells[0][0] = "Физика";
  StringGrid1->Cells[1][0] = "Химия";
  StringGrid1->Cells[2][0] = "Информатика";
  StringGrid1->Cells[3][0] = "Алгебра";
  StringGrid1->Cells[4][0] = "Мат.анализ";
  StringGrid2->Cells[0][0] = "ФИО Студента";
  StringGrid2->Cells[1][0] = "Группа";
  StringGrid2->Cells[2][0] = "Средний балл";
        StringGrid2->Cells[3][0] = "Физика";
        StringGrid2->Cells[4][0] = "Химия";
        StringGrid2->Cells[5][0] = "Информатика";
        StringGrid2->Cells[6][0] = "Алгебра";
        StringGrid2->Cells[7][0] = "Мат.анализ";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if(!Check())
   {
     ShowMessage("Не все данные введены.");
     return;
   }
  int b = 0;
  Stud[nStud].FIO = Edit1->Text;
  Edit1->Text = "";
  Stud[nStud].Group = Edit2->Text;
  Edit2->Text = "";
 
                for(int i = 0; i < 5; i++)
   {
     Stud[nStud].Balls[i] = StrToInt(StringGrid1->Cells[i][1]);
     StringGrid1->Cells[i][1] = "";
                b += Stud[nStud].Balls[i];
 
   }
  Stud[nStud].sBall = (int)(b/5.0 + 0.5);
  nStud++;
  StringGrid2->Cells[0][nStud] = Stud[nStud-1].FIO;
  StringGrid2->Cells[1][nStud] = Stud[nStud-1].Group;
  StringGrid2->Cells[2][nStud] = Stud[nStud-1].sBall;
 
  StringGrid2->Cells[3][nStud] = Stud[nStud-1].Balls[0];
  StringGrid2->Cells[4][nStud] = Stud[nStud-1].Balls[1];
  StringGrid2->Cells[5][nStud] = Stud[nStud-1].Balls[2];
  StringGrid2->Cells[6][nStud] = Stud[nStud-1].Balls[3];
  StringGrid2->Cells[7][nStud] = Stud[nStud-1].Balls[4];
 
  Button1->Caption = "Добавлено " + IntToStr(nStud) + " записей.";
  if(nStud >= r)
   {
     for(int i = 1; i <= 10; i++)
      for(int j = 0; j < 3; j++)
       StringGrid1->Cells[j][i] = "";
     TStudents tmp;
     for(int i=0, j=0; i < r; i++)
      {
        tmp.FIO = Stud[i].FIO;
        tmp.Group = Stud[i].Group;
        tmp.sBall = Stud[i].sBall;
        j = i - 1;
        while((j >= 0) && (Stud[j].sBall > tmp.sBall))
         {
           Stud[j+1] = Stud[j];
           j = j - 1;
         }
        Stud[j+1].FIO = tmp.FIO;
        Stud[j+1].Group = tmp.Group;
        Stud[j+1].sBall = tmp.sBall;
      }
     for(int i = 0; i < r; i++)
      {
        StringGrid2->Cells[0][i + 1] = Stud[i].FIO;
        StringGrid2->Cells[1][i + 1] = Stud[i].Group;
        StringGrid2->Cells[2][i + 1] = Stud[i].sBall;
      }
     GroupBox1->Enabled = false;
     Button2->Enabled = true;
         Button4->Enabled = true;
   }
}
//---------------------------------------------------------------------------
bool __fastcall TForm1::Check()
{
  if(Edit1->Text.Trim().IsEmpty() || Edit2->Text.Trim().IsEmpty()) return false;
  for(int i = 0; i < 5; i++)
   if(StringGrid1->Cells[i][1].Trim().IsEmpty()) return false;
  return true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  int iRow = 2;
  for(int i = 0; i <= r; i++)
   if((Stud[i].Balls[i] >= 2))
 
    {
      StringGrid3->Cells[0][iRow-1] = Stud[i].FIO;
      StringGrid3->Cells[1][iRow-1] = Stud[i].Group;
      StringGrid3->Cells[2][iRow-1] = Stud[i].sBall;
 
  StringGrid3->Cells[3][iRow-1] = Stud[i].Balls[0];
  StringGrid3->Cells[4][iRow-1] = Stud[i].Balls[1];
  StringGrid3->Cells[5][iRow-1] = Stud[i].Balls[2];
  StringGrid3->Cells[6][iRow-1] = Stud[i].Balls[3];
  StringGrid3->Cells[7][iRow-1] = Stud[i].Balls[4];
      iRow++;
      StringGrid3->RowCount = iRow;
    }
    else((Stud[i].Balls[i] <= 2));
        {
     ShowMessage("Нет двоечников.");
     return;
         }
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button4Click(TObject *Sender)
 {  // Сохранить
std::auto_ptr<TStringList> SL(new TStringList);
 
for(int i=0;i<StringGrid2->RowCount;i++)
 {
  StringGrid2->Rows[i]->Delimiter=L';'; // Разделитель
  SL->Add(StringGrid2->Rows[i]->DelimitedText);
 }
SL->SaveToFile("общий список.txt");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
{  // Сохранить
std::auto_ptr<TStringList> SL(new TStringList);
 
for(int i=0;i<StringGrid3->RowCount;i++)
 {
  StringGrid3->Rows[i]->Delimiter=L';'; // Разделитель
  SL->Add(StringGrid3->Rows[i]->DelimitedText);
 }
SL->SaveToFile("список двоечников.txt");
}
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{
{ // Загрузить
std::auto_ptr<TStringList> SL(new TStringList);
 
SL->LoadFromFile("общий список.txt");
 
for(int i=0;i<SL->Count;i++)
 {
  StringGrid2->Rows[i]->Delimiter=L';';
  StringGrid2->Rows[i]->DelimitedText= SL->Strings[i];
 }
}
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button6Click(TObject *Sender)
{
{// Очистить
for(int i=0;i<StringGrid2->RowCount;i++)
 {
  StringGrid2->Rows[i]->Clear();
 }
}
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button7Click(TObject *Sender)
{
{// Очистить
for(int i=0;i<StringGrid3->RowCount;i++)
 {
  StringGrid3->Rows[i]->Clear();
 }
 }
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button8Click(TObject *Sender)
{
Close();
}
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.04.2017, 17:57
Ответы с готовыми решениями:

Матрица : вывести положительные числа. Если таковых нет - вывести надпись об отсутствии таковых чисел
Как вывести надпись об отсутствии положительных чисел? #include &lt;iostream&gt; #include &lt;ctime&gt;...

Как заменить элементы массива меньших 30 числом 30, а если таковых нет вывести сообщение
Как заменить элементы массива меньших 30 числом 30, а если таковых нет вывести сообщение Sub...

Даны числа a, b, c. Если все они равны нулю, вывести об этом сообщение, если среди чисел нет нулей, найти и вывести их произведение, в противном случа
Всем привет. Будьте добры, подсобите в написании программки: &quot;Даны числа a, b, c. Если все они...

Вывести на экран слова, в которых все символы повторяющиеся, или сообщение «Нет», если требуемых слов нет
Дана последовательность символов, состоящая из слов. Вывести на экран слова, в которых все символы...

2
724 / 516 / 128
Регистрация: 31.05.2013
Сообщений: 2,838
Записей в блоге: 3
20.04.2017, 18:06 2
Udji, То есть Вам лень разбираться в чужом коде, и вы хотите что бы кто то другой в нем разобрался?

PS. Уровень кода явно указывает на то что если бы это Вы писали, то такую мелочь бы как вывод отстающих студентов, легко бы реализовали.
0
SeaMonkey
21.04.2017, 17:14     Найти одного или нескольких двоичников вывести в StringGrid, если таковых нет то вывести сообщение
  #3

Не по теме:

Интересно, это Вам не дали полный код, или Вы сами вырезали, то что не нужно?)

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.04.2017, 17:14

Вывести номера элементов заданного массива, больших 1, а если таковых нету, то вывести номер наибольшего
Написал программу, которая выводит номера элементов, больших 1. Если таковых нету, то программа...

Если хотя бы один из Edit-ов или ячейка StringGrid не заполнены, то вывести сообщение об ошибке
ПРоблема заключается в том что есть форма, на форме расположена таблица StringGrid и 2 Edit в...

Вывести на экран номер последнего честного числа в массиве, если четных чисел нет – вывести сообщение
Помогите написать код... очень надо для зачета!))) желательно на С++ дев... чтобы с описаниями))...

Выяснить, имеется ли в строке пара соседствующих букв НО или ОН, если нет, то вывести на экран сообщение об этом
Выяснить имеется ли в строке пара соседствующих букв НО или ОН, если нет, то вывести на экран...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru