Задание на лабораторную работу. 1. Получить задание в соответствии с номером своего варианта.

💸 Как сделать бизнес проще, а карман толще?

Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание, но и напоминать клиентам о визитах тоже. Проблема в том, что средняя цена по рынку за такой сервис — 800 руб/мес или почти 15 000 руб за год. И это минимальный функционал. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
⚡️ Для новых пользователей первый месяц бесплатно. А далее 290 руб/мес, это в 3 раза дешевле аналогов. За эту цену доступен весь функционал: напоминание о визитах, чаевые, предоплаты, общение с клиентами, переносы записей и так далее.
✅ Уйма гибких настроек, которые помогут вам зарабатывать больше и забыть про чувство «что-то мне нужно было сделать».
Сомневаетесь? нажмите на текст, запустите чат-бота и убедитесь во всем сами!

1. Получить задание в соответствии с номером своего варианта.

2. Составить схему алгоритма решения задачи.

3. Написать код программы на языке Паскаль в среде Borland Pascal for Windows.

4. Осуществить компиляцию и отладку программы. Провести структурное тестирование программы (тестирование как белого ящика) – составить тестовые наборы для тестирования:

- по критерию покрытия решений – результат проверки каждого условия принимал значение истина или ложь хотя бы один раз,

- по критерию покрытия условий – все возможные результаты каждой логической операции в условиях были получены хотя бы по одному разу.

1. Ввести с консоли строку символов. Определить количество цифр в этой строке
и найти их сумму.

Начальные значения суммы summa и количества count сбрасываем на ноль. Определим длину введенной строки str, используя функцию Length(str). После этого будем рассматривать строку поэлементно: если очередной элемент – это цифра, то добавляем его в сумму summa и увеличиваем количество цифр count на единицу. Для определения того, является ли очередной элемент строки цифрой, можно использовать операцию вхождения во множество цифр In [0..9] или коды элементов: код нуля – это 48, код единицы – это 49 и так далее. Найденные цифры, их количество и сумму вывести на экран.