Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
marius95
07.11.2021 19:34 •
Информатика
Дано предложение (вводится с клавиатуры) , в котором некоторые символы являются цифрами. найдите сумму этих цифр. подсказка: порядковые номера символов 0-9 в таблице acsii лежат в интервале 48-57
Ответ:
Нияз170406
07.10.2020 06:59
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите строку: ');
Writeln(s.MatchValues('\d').Select(c->c.ToInteger).Sum)
end.
Пример
Введите строку: erer-5.456*3453gsd(4fgfh.==ertfer)re34se
46
0,0
(0 оценок)
Популярные вопросы: Информатика
NikoBellic99
04.05.2022 16:26
Какое слово скрыто в ребусе (понятие из информатики)?...
kazymbietova71
17.10.2020 20:41
. Скільки разів виконається цикл?a=0for i in range (1,5):a=a+10...
saint6928
25.06.2020 13:30
Даю 25 б Що буде надруковане в результаті виконання фрагменту програми? for i in range(4):print(i)print(i * 2))Позначте одну правильну відповідь....
вика6010
09.07.2022 03:30
Даны числа: a и b. если a b, то уменьшить его в 2 раза, иначе увеличить на 3....
annmalik98
09.07.2022 03:30
Руслан закодировал своё имя по следующему алгоритму : сначала он выписал номера букв алфавита (а-1,б-) в своём имени друг за другом без пробелов и знаков препинания...
толстыи
28.05.2020 20:40
Найти максимальное и минимальное из двух чисел (проверить, равны ли числа)...
2x2466
28.05.2020 20:40
Некоторые из нашего класса любят ходить в кино. известно что 15 смотрели фильм обитаемый остров , 11 человек - фильм стиляги , шесть из них смотрели и обитаемый...
emphasisone
28.05.2020 20:40
Определите, что будет напечатано в результате работы следующей программы. текст программы на трех языках программирования. алгоритмический язык. алг нач цел s, k...
шота1
28.05.2020 20:40
Как называется на игрушечная машина как называется на игрушечная машина...
sagoankristina1
28.05.2020 20:40
1.перевести в восьмеричную и шестнадцатеричную системы счисления следующие дробные числа: 0,01111(2), 1010101(2) 2. перевести в двоичную систему счисления следующие...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите строку: ');
Writeln(s.MatchValues('\d').Select(c->c.ToInteger).Sum)
end.
Пример
Введите строку: erer-5.456*3453gsd(4fgfh.==ertfer)re34se
46