Question

Pascal: 1) Ввести текст. Вывести каждый второй символ. 2) Ввести текст. Определить сколько раз в нем встречается буква “а”.

Answer 1

===== PascalABC.NET =====

begin

 var s := ReadlnString;

 s[1::2].Println;

 s := ReadlnString;

 s.Count(c -> c = 'а').Print

end.

Answer 2

Sure! Here's the Python code to accomplish the tasks you described:

1. Вывести каждый второй символ:

pythonCopy code
text = input("Введите текст: ")
result = text[1::2]
print("Каждый второй символ:", result)

2. Определить, сколько раз в тексте встречается буква "а":

pythonCopy code
text = input("Введите текст: ")
count = text.lower().count('а')
print("Количество вхождений буквы 'а':", count)

Пример использования:

arduinoCopy code
1) Введите текст: Пример текста
Каждый второй символ: рмр еа

2) Введите текст: Привет, как дела?
Количество вхождений буквы 'а': 2

Обратите внимание, что в примере для подсчета количества вхождений буквы "а" использован метод lower(), чтобы учесть как заглавные, так и строчные варианты буквы "а".