Question

Марвин. Роботу Марвину одновременно можно поручить решать до 256 задач. Настроение Марвина измеряется целым числом от 0 до 100. Если среди порученных Марвину задач попадаются трудные задания или неразрешимые проблемы, то его настроение улучшается на 1. До того, как Марвину будут даны какие-либо задачи, его настроение равно 0. Напишите программу для подсчета настроения Марвина после поручения ему всех задач.

Формат входных данных

В первой строке содержится число K порученных Марвину задач (1 ≤ K ≤ 256).

Во второй строке записана последовательность из букв s, d и f длиной K, где s означает, что Марвину поручено трудное задание, d — неразрешимая проблема, а f — задача, которая не является ни трудной, ни неразрешимой.

Формат выходных данных

Одно число — настроение Марвина.

Пример входных и выходных файлов

task1.in

10

sdffsdfsdf


100

fffffsdsdsdffffffffffffssfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffdfffff


task1.out

6


9

Answer 1

Ответ:

Ok. Ввиду того, что язык указан не был, Паскаль, я выбираю тебя!

Var k,c,i:integer;

S:sting[256];

Begin

Read(k);

Read(s);

For i:= 1 to k do

If s[i] <> 'f' then c:=c+1;

Write(c);

End.