PASCAL! 1. Определить, как часто встречается определенный символ в строке 2. У Леонида Пантелеева в рассказе “Буква «ты»” девочк
PASCAL!
1. Определить, как часто встречается определенный символ в строке 2. У Леонида Пантелеева в рассказе “Буква «ты»” девочка Иринушка думала, что буква “я” читается как “ты”. Во входной строке записаны слова в произношении Иринушки. Замените неправильный слог “ты” на правильный слог “я”. 3. Найти в строке определенную последовательность символов и заменить ее другой.
<em>// PascalABC.NET 3.2, сборка 1370 от 24.12.2016</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
begin var s:=ReadlnString('Введите строку:').ToLower; var c:=ReadlnChar('Введите искомую букву:').ToLower; Writeln('Буква встречается ',s.Where(a->a=c).Count,' раз(а)') end.
<u>Пример</u> Введите строку: А роза упала на лапу Азора Введите искомую букву: а Буква встречается 8 раз(а)
<em>// PascalABC.NET 3.2, сборка 1370 от 24.12.2016</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
begin var s:=ReadlnString('Введите фразу:'); s.Replace('Ты','Я').Replace('ты','я').Println end.
<em>// PascalABC.NET 3.2, сборка 1370 от 24.12.2016</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
begin var s:=ReadlnString('Введите строку:'); var s1:=ReadlnString('Что найти?'); var s2:=ReadlnString('Чем заменить?'); s:=s.Replace(s1,s2); s.Println; end.
<u>Пример</u> Введите строку: мама, мама, что я буду делать, мама, мама, как я буду жить? Что найти? мама Чем заменить? папа папа, папа, что я буду делать, папа, папа, как я буду жить?
Это цикл. Начальное значение 1. Цикл будет выполняться 4 раза. 1. 1+1*2=3, теперь f равно 3. 2. 3+2*2=7, теперь f равно 7. 3. 7+3*2=13, теперь f равно 13. 4. 13+4*2=21. После выполнения алгоритма f будет равно 21.