Дан текст. Определить количество цифр в нем

Question

56

Дан текст. Определить количество цифр в нем

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

alex768 · Accepted Answer

66

alex768

10 марта 2023

vari,count: integer; str: string; beginreadln (str); for i: =1 to length (str) do beginif (ord (str[i]) >=48) and (ord (str[i]) <= 57) then inc (count); end; writeln ('Количество цифр=',count); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: