Предмет: Информатика,
автор: Dad51
Дана строка 'аб12сд134е5'.Из неё нужно узнать кол-во ЧИСЕЛ,которые больше 10 и вывести их.Язык программирования:Pascal
Ответы
Автор ответа:
0
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите строку:');
var m:=s.Matches('d+').Where(x->x.Length>1);
Write('Найдено чисел- ',m.Count,': '); m.Println(',')
end.
Пример
Введите строку: аб12сд134е5
Найдено чисел- 2: 12,134
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите строку:');
var m:=s.Matches('d+').Where(x->x.Length>1);
Write('Найдено чисел- ',m.Count,': '); m.Println(',')
end.
Пример
Введите строку: аб12сд134е5
Найдено чисел- 2: 12,134
Похожие вопросы
Предмет: Алгебра,
автор: Bakito77
Предмет: Русский язык,
автор: vika253059
Предмет: Математика,
автор: jllms
Предмет: Математика,
автор: гоша24ъквбелвтлыбыу
Предмет: Алгебра,
автор: mansurgaynullin