С клавиатуры вводится строка состоящая из букв, знака пробела и циифр. определите количество цифр в этой строке

15 Мар 2020 в 19:41
136 +1
0
Ответы
1

var s: string; k,i: integer;

begin

k:=0;

readln(s);

for i:=1 to length(s) do

 if (s[i]>='0')and(s[i]<='9') then k:=k+1;

writeln(k);

end.

17 Мар 2020 в 14:19
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир