Bash.org.ru IT Happens Истории ## 7801 – 7900

#7882: А мы тут ни при чём

14:00 27.11.2011, IT happens

В контрольной работе по информатике для студентов экономического факультета требовалось написать на Паскале программку: подсчитать, сколько раз во введённой с клавиатуры строке встречается подстрока «мн». Выдержка из одной контрольной:

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

readln(str);

writeln('Сколько раз в этой строке встречается подстрока "мн"?');

readln(n);

writeln('Такая подстрока встречается ',n,' раз');