Предмет: Информатика,
автор: 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
Похожие вопросы
Предмет: Қазақ тiлi,
автор: muslimalmas2206
Предмет: Геометрия,
автор: dashakotova251
Предмет: Литература,
автор: adelinzay
Предмет: Математика,
автор: гоша24ъквбелвтлыбыу
Предмет: Алгебра,
автор: mansurgaynullin