нужно составить блок схемы по коду. помогите они нужны срочно, но у меня не получается
1)
код расчитывает количество букв, слов, предложений и абзацев тексте
Код:
private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) {
if (richTextBox1->Text != "")
{
int bukv = 0;
int slov = 0;
int pred = 0;
int abzac = 0;
int schet_slov = 0;
String^ stroka = "";
stroka = richTextBox1->Text;
int n = stroka->Length;
for (int i = 0; i<n; i++)
{
if (System::Char::IsLetter(stroka[i]))
{bukv++;
schet_slov++;
}
if (!(System::Char::IsLetter(stroka[i])))
{
if (schet_slov > 0)
{slov++;}
schet_slov = 0;
}
if (i==n-1)
{
if (System::Char::IsLetter(stroka[i]))
slov++;
}
if (stroka[i] == '.' && System::Char::IsLetter(stroka[i-1]) && System::Char::IsLetter(stroka[i-2])
|| stroka[i] == '!' && System::Char::IsLetter(stroka[i-1]) && System::Char::IsLetter(stroka[i-2])
|| stroka[i] == '?' && System::Char::IsLetter(stroka[i-1]) && System::Char::IsLetter(stroka[i-2]) )
{pred++;}
if (stroka[i] == '\t')
abzac++;
}
textBox1->Text = System::Convert::ToString(bukv);
textBox2->Text = System::Convert::ToString(slov);
textBox3->Text = System::Convert::ToString(pred);
textBox5->Text = System::Convert::ToString(abzac);
}
else {richTextBox1->Text="Введите текст в это поле!";
textBox1->Text = "0";
textBox2->Text = "0";
textBox3->Text = "0";
textBox5->Text = "0";
}
}
2)
код поиска введённого слова
Код:
private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e) {
String^ strokas = "";
String^ first = "";
String^ verh = "";
String^ niz = "";
String^ search = "";
String^ text = "";
String^ slovo = "";
int stroka = 0;
int schet = 0;
search = textBox4->Text;
text = richTextBox1->Text;
int n = text->Length;
int iskomoe_kol = search->Length;
if (search!="")
{
first = search->String::Substring(0,1);
verh = first->String::ToUpper() + search->String::Substring(1,iskomoe_kol-1) ;
niz = first->String::ToLower() + search->String::Substring(1,iskomoe_kol-1) ;
for (int i = 0; i < n; i++)
{
if (verh[0] == text[i])
{
slovo = text->String::Substring(i,iskomoe_kol);
if (slovo == verh)
{
stroka = richTextBox1->GetLineFromCharIndex(i) + 1;
strokas = strokas + "_" + System::Convert::ToString(stroka);
schet++;
}
}
}
for (int i = 0; i < n; i++)
{
if (niz[0] == text[i])
{
slovo = text->String::Substring(i,iskomoe_kol);
if (slovo == niz)
{
stroka = richTextBox1->GetLineFromCharIndex(i) + 1;
strokas = strokas + "_" + System::Convert::ToString(stroka);
schet++;
}
}
}
if (schet>0)
{
textBox6->Text ="Найдено " + System::Convert::ToString(schet) + " слов(а)";
textBox7->Text ="Найдено на строке(ках): " + strokas;
}
else {
textBox6->Text = "Не найдено!!!";
textBox7->Text = "Не найдено!!!";
}
}
else {textBox6->Text = "Вы не ввели слово!";textBox7->Text = "Вы не ввели слово!";}
}
___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE]
(кнопочка на панели форматирования с решёточкой #)
Не забывайте об этом!
Модератор.