Войти Регистрация Спроси ai-bota

Паскаль. составте программу, позволяющую найти количество цифр во введённой строке s. пример ввода: 3 июля 2015 года пример вывода: количество цифр в строке = 5

Ответ:

KarinaCorso

07.10.2020 08:33

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var s:=ReadlnString('Строка:');
Writeln('Количество цифр в строке = ',s.MatchValues('\d').Count)
end.

Пример
Строка: 3 июля 2015 года
Количество цифр в строке = 5

0,0(0 оценок)

Популярные вопросы: Информатика

елен9

13.03.2023 05:28

2) Сколько единиц в записи десятичногочисла 128 в двоичной системе счисления?...

юлияlike1302

23.01.2022 08:53

Решите уравнение 54 в семиричной системе счисления + x = 320 в пятиричной системе счисления...

haha1

11.02.2022 00:45

Информатика 10 класс ! 5.какая уникальная строка присутствует в excel… а) строка формул б) строка состояния в) строка вычислений г) строка инструментов 8.что значит...

СтилРайдер

24.08.2022 01:31

Синформатикой, заранее ! выбрать варианты ответов: 1.книгой является… (2 ) а) таблица б) табличный процессор в) excel г) документ, созданный в excel 2.расширение книги…...

Z1439373

10.08.2022 19:56

питон напишите программу, которая запрашивает у пользователя число. Если оно больше нуля, то в ответ на экран выводится число 1. Если введенное число не является положительным...

1234567890847

09.02.2022 14:42

Назовите какие примитивные 3D объекты вы знаете...

blurryriden

19.07.2020 20:06

Пользуясь основными законами алгебры логики, у следующие логические выражения: см. скрин...

БелыйЯд

15.03.2021 21:54

D. Нанокристаллы Ограничение времени 10 секунд Ограничение памяти 64.0 Мб Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt Нанотехнологи проводят...

клубника25

08.08.2021 04:36

2. В ячейку С2 введена формула. Напишите значение, которое должно получиться в ячейке С2 А В с 1 2 (19 3 121 EA282 ( ) ответ: .....

ggghh99

21.01.2021 07:20

Документ (без упаковки) можно передать по каналу связи с одного компьютера на другой за 65 секунд.Если предварительно упаковать документ архиватором, передать упакованный...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку