Задать вопрос
ИнформатикаИнформатика
12 сентября, 17:28

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

Пример ввода:

Не стыдно не знать - стыдно не учиться.

+4
Ответы (1)
  1. 12 сентября, 19:28
    0
    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.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Составьте программу подсчета общего количества слогов "не", "не" во введенной с клавиатуры строке s. Пример ввода: Не стыдно не знать - ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » Составьте программу подсчета общего количества слогов "не", "не" во введенной с клавиатуры строке s. Пример ввода: Не стыдно не знать - стыдно не учиться.
Регистрация Забыл пароль