Задача 3 Урок 16
Primary tabs
Пользователь вводит строку произвольных символов, посчитайте количество цифр в ней.
Подсказка: для определения принадлежности символа цифре используйте идею из этого кода.
var s: string; i, n: integer; begin write('Введите произвольную строку: '); readln(s); for i:=1 to length(s) do if (s[i] >= '0') and (s[i] <= '9') then n += 1; writeln('В строке ', n , ' цифр'); readln(); end.
- Log in to post comments
- 806 reads