Из строки, состоящей из букв, цифр, запятых, точек, знаков + и - , выделить подстроку, соответствующую записи целого

@Галина23011996 · Регистрация: 23.04.2015

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

помогите дописать программу
Из строки, состоящей из букв, цифр, запятых, точек, знаков + и – , выделить подстроку, которая соответствует записи целого числа

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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#include<string.h>
#include<stdlib.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
void cifra(String, int);
String buff = "";
int k;
//создадим массив цифр
        String a="0123456789";
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Close();        
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormActivate(TObject *Sender)
{
Form1->Edit1->SetFocus();        
}
//---------------------------------------------------------------------------
 
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if (Key == 13)  {
        ListBox1->Items->Add(Edit1->Text);
// Строка из окна редактирования заносится в ComboBox1
        Edit1->Text="";             // Очистка окна
}
}
//-----------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 int n, i, j, nst, s=0, l=1;
        nst = ListBox1->ItemIndex;              // Определение номера строки
        String st = ListBox1->Items->Strings[nst];  // Запись выбранной строки st
        n=st.Length();
 
 
        //удаляем все символы до первой цифры
        for(i=1;i<=n;i++){
        s=0;
         for(j=1;j<=10;j++)
          if(st[i]==a[j]) s++;
        if(s==0){
         st.Delete(1,1);
         i--;
         }
        else break;
        }
 
         cifra(st,l);
         if(st[k]==','){
         cifra(st,k+1);       //продолжаем сбор цифр
         }
 
        Label4->Caption=buff;
 
}
//---------------------------------------------------------------------------
 void cifra(String s, int l)
{
   int j, c;
 
   for(k=l;k<=s.Length();k++)
   { c=0;
      for(j=1;j<=10;j++)
        if(s[k]==a[j])c++;
 
   if(c!=0)buff+=s[k];
   else break;
   }
}

@nick42 · 20.04.2018, 12:01

Галина23011996, попробуйте через sscanf__

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 /*  #include <stdio.h>  */
     int dt ; char fl[999] ;
     sscanf(Edit1->Text.c_str(),"%s%c%s%d%s",
       &fl,&fl,&fl,&dt,&fl);
     Label1->Caption = dt;
}

@volvo · 20.04.2018, 12:12

Судя по изначально приведенному коду, числа могут быть только положительными, тогда:

C++
1
2
3
char garbage[1024];
int n;
sscanf(Edit1->Text.c_str(), "%[^0123456789]%d", garbage, &n);

@Галина23011996 · 20.04.2018, 12:36 **[ТС]**

а можно сделать так чтобы выводило 48522?

@volvo · 20.04.2018, 13:01

C++
1
2
3
4
5
6
7
8
9
10
11
12
#include <tchar.h>
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TCHAR garbage[256] = {0};
    TCHAR n[128] = {0};
    do
      _stscanf(Edit1->Text.c_str() + _tcslen(garbage) + _tcslen(n), _T("%[^0-9]%[0-9]"),
        garbage + _tcslen(garbage), n + _tcslen(n));
    while (_tcslen(garbage) + _tcslen(n) < Edit1->Text.Length());
    ShowMessage(n);
}

, проверил на XE4 - работает.

Если только для старых Билдеров (до RAD 2009), или только для новых (после RAD 2009) - то можно заменить универсальные функции на конкретные для ANSI/Unicode: _stscanf - на sscanf/swscanf соответственно, _tcslen - на strlen/wcslen. Мой код должен работать независимо от версии Билдера, нужные функции будут подставлены автоматически.

@nick42 · 20.04.2018, 13:30

Сообщение от Галина23011996

а можно сделать так чтобы выводило 48522?

Ага.

C++
1
2
3
4
5
6
7
void __fastcall TForm1::Button1Click(TObject *Sender)
{
     String Ga="5432106789", Gt=Edit1->Text, Gb= "" ;
     int i=0; while(++i<=Gt.Length())
       if(Ga.Pos(Gt[i])) Gb += Gt[i];
     Label1->Caption = Gb;
}

Новые блоги и статьи Все статьи Все блоги /
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом

@Галина23011996 1 / 1 / 0 Регистрация: 23.04.2015 Сообщений: 31
	20.04.2018, 12:36 [ТС]
	а можно сделать так чтобы выводило 48522? 0