Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Marshmelloo
14.05.2021 07:04 •
Информатика
Составьте программу позволяющую найти количество цифр во введённой строке s
Показать ответ
Ответ:
опалссио
03.10.2020 00:45
Count:=0;
for i:=1 to Length(St) do if Ord(St[i]) in [48..57] then Inc(Count);
Writeln(Count);
0,0
(0 оценок)
Популярные вопросы: Информатика
otoshol62
04.12.2022 03:04
Cколько значащих нулей содержится в записи 5^25+5^5+6?...
amink1a
01.10.2022 07:38
чему равно колличество бит информации (в соответствии с формулой хартли), если событие имеет 8 равновероятных исходов?...
sanekmmg1980
04.04.2022 08:42
Составить блок-схему алгоритма и программу на паскале для вычисления функций y(x). ввести программу в эвм, вычислить значения функции и проверить ее. в отчет включить...
loser05
06.07.2020 17:59
Нужно решить все , покажите хотябы по одному примеру как решать в каждом...
eliseygrid53
14.02.2023 01:45
Начертите блок-схему к этой программе...
Elinasuper18
24.06.2022 21:04
ДАЮ 40 , построены дороги. Определи длину кратчайшего пути между пунктами и . Передвигаться можно только по дорогам, протяжённость которых указана в таблице. 2 2 19 2...
sveta19772011owor7w
21.12.2020 09:51
Растровый файл, содержащий черно-белый (без оттенков серого) квадратный рисунок, имеет объем 50 байт. рассчитайте размер стороны квадрата (в пикселях). 100 !...
ГретхенМарго
06.04.2021 08:24
10. составьте программу вычисления значення функции согласно предложеному варианту т = (k – п/k - n sin( 2а 13) при n-0.508; k=0.756; а= 45 градусов , ставлю 100 !...
kyrmaeva200614
26.09.2022 11:29
Вжургале 96 стр ,56 стр печатного текста в котором 40 строк по 40 символов ,остальные страницы -фото из них 20фото -объемом по 2 мб а еще 20- по 3мб.скорость соединения...
angel218
12.08.2022 06:42
Требуется написать блокнот на делфи. написал всё, кроме кнопки сохранить не пойму как сделать так, что бы при нажатии она работала как и в блакноте обычном. : )...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
for i:=1 to Length(St) do if Ord(St[i]) in [48..57] then Inc(Count);
Writeln(Count);