Урок 17. Задача 3.
Primary tabs
Пользователь вводит строку произвольных символов, посчитайте количество цифр в ней.
var s :string; i, n :integer; begin s := 'Lorem5Ipsum7is1simply1dummy3text8of9the0printing4and6typesettin2industry'; n := 0; for i := 1 to length(s) do if (s[i] >= '0') and (s[i] <= '9') then n := n + 1; writeln(n); end.
- Log in to post comments
- 288 reads
vedro-compota
Thu, 09/08/2022 - 19:31
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)