• Марвин. Роботу Марвину одновременно можно поручить решать до 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

    question img

Ответы 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.

    • Автор:

      gavynf6qu
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years