
Написать программу для решения задачи. Дана строка, содержащая текст. Сколько слов в тексте?
Сколько цифр в тексте?

Ответы на вопрос

program raf105;
var
s,s1,s2: string;
slov,numb,i,j,l: integer;
begin
writeln('Введите строку:');
readln(s);
s:= lowercase(s);
s1:= 'йцукенгшщзхъфывапролджэячсмитьбюёqwertyuiopasdfghjklzxcvbnm';
s2:= '1234567890';
while j<>-1 do
begin
j+= 1;
l+= 1;
for i:=1 to length(s1) do
if (s[j] = s1[i]) and (slov = 0)
then slov+= 1
else if (i<=length(s2)) and (s[j] = s2[i])
then numb+=1;
if s[j+1] = ' '
then j:= -1;
end;
for i:=l+1 to length(s) do
begin
if s[i] = ' '
then
begin
for j:=1 to length(s1) do
if s[i+1] = s1[j]
then slov+= 1;
end
else
begin
for j:=1 to length(s2) do
if s[i] = s2[j]
then numb+=1;
end;;
end;
writeln;
writeln('В строке:');
writeln(slov,' сл.');
writeln(numb,' циф.');
end.
Язык PascalABC



Ответ:
{подсчёт числа символов цифр в строке}
var s:string; i,n:Integer;
begin
readln(s);
n := 0;
for i:=1 to Length(s) do begin // обходим строку в цикле
if (s[i]>='0')and(s[i]<='9') then inc(n);
end;
writeln('This string contains ',n,' digits.'); // выводим массив
end.



Для решения этой задачи, можно написать программу на языке программирования Python. Вот пример программы, которая считает количество слов и цифр в данном тексте:
pythondef count_words_and_digits(text):
word_count = 0
digit_count = 0
for char in text:
if char.isalpha(): # Проверяем, является ли символ буквой (слово)
word_count += 1
elif char.isdigit(): # Проверяем, является ли символ цифрой
digit_count += 1
return word_count, digit_count
if __name__ == "__main__":
input_text = input("Введите текст: ")
words, digits = count_words_and_digits(input_text)
print(f"Количество слов в тексте: {words}")
print(f"Количество цифр в тексте: {digits}")
Программа будет запрашивать у пользователя ввести текст, а затем выведет количество слов и количество цифр в этом тексте.
Пример использования:
Введите текст: Пример текста с 4 цифрами и 9 словами. Количество слов в тексте: 9 Количество цифр в тексте: 1
Обратите внимание, что в данной программе цифры, встречающиеся внутри слов (например, "word123") будут считаться как часть слова, и не будут учитываться отдельно как цифры.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili