Составьте программу подсчета общего количества слогов "не", "не" во введенной с клавиатуры строке s. пример ввода: не стыдно не знать - стыдно не учиться.

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 ReadlnString.MatchValues('[Нн]е').Count.Println

end.

var s:string;

i,k:integer;

begin

write ('Введите строку: ');

readln (s);

for i:=1 to length(s)-1 do

if ((s[i]='н') or (s[i] = 'Н')) and ((s[i+1] = 'е') or (s[i+1] = 'Е')) then k:=k+1;

write ('Количество слогов не равно: ',k)

end.

P =NP

Объяснение:

создаем переменую х и у

и содаем перемную х 1 и  у1

P равно х и игрек

NP равно х 1 и  у1

теперь P =NP

проверяем в системе кординат например 8 на 8

мы видим равенство класов

смотри мы можем сделать так

допустим это книга с пронумероваными страницами

каждая страница собщаеть какой диапазон значение на даном поле

но если мы будем сравнивать первая клетка и каждую последущую перебором это будет  долго

мы можем наложить поле на поле   и проверить сразу два значения  и сравнить их отельно

то есть  найдя на страничке  список номеровмы можем сразу  выводить значения из поля  и передать еще одной переменой проверить  были совпадения или нет

Скажи училке что я хочу участвовать друг против друга как бы я ни в чем не был создан тест и все это дело что я знаю что и я и 3 3 33 3 и я не знаю как это делать и как быть дальше и как это делать с этим я не знаю как это делать и как быть дальше и как это происходит это когда ты в магазине кокой в и в этом случае я буду выходить в окно с таким же как и в конце ночи а потом уже и и не только в том числе в конце Ты где то ‍♂️ с тебя и так далее по тебе я скучаю and once again I apologize to all 8 8⃣ and i do not agree with you and with pleasure and just on the Internet there was no doubt about it

Объяснение:

Спецификация суммативного оценивания за что я не знаю как это делать с моей стороны я не знаю как это сделать в письме или в чем это может связано со временем и как я написал и что я вижу и в чём именно их