profile
Размещено 6 лет назад по предмету Информатика от MatukuKupuk1

55 баллов, на C++.

Любимые геометрические фигуры Антона — правильные многогранники. Напомним, что правильных многогранников всего пять видов:


Тетраэдр. У тетраэдра 4 треугольных грани.

Куб. У куба 6 квадратных граней.

Октаэдр. У октаэдра 8 треугольных граней.

Додекаэдр. У додекаэдра 12 пятиугольных граней.

Икосаэдр. У икосаэдра 20 треугольных граней.

У Антона есть целая коллекция из n многогранников. Однажды ему стало интересно, сколько суммарно граней у всех фигур в его коллекции. Помогите Антону найти это число!


Входные данные

В первой строке входных данных находится целое число n (1 ≤ n ≤ 200 000) — количество многогранников в коллекции у Антона.


В следующих n строках входных данных находится по одной строке si — название i-го многогранника в коллекции Антона. Строка может иметь следующий вид:


«Tetrahedron» (без кавычек), если i-й многогранник в коллекции Антона — тетраэдр.

«Cube» (без кавычек), если i-й многогранник в коллекции Антона — куб.

«Octahedron» (без кавычек), если i-й многогранник в коллекции Антона — октаэдр.

«Dodecahedron» (без кавычек), если i-й многогранник в коллекции Антона — додекаэдр.

«Icosahedron» (без кавычек), если i-й многогранник в коллекции Антона — икосаэдр.

Выходные данные

Выведите одно целое число — суммарное число граней у всех многогранников в коллекции Антона.


Примеры:

Входные данные:

4

Icosahedron

Cube

Tetrahedron

Dodecahedron

Выходные данные:

42


Входные данные:

3

Dodecahedron

Octahedron

Octahedron

Выходные данные:

28


Примечание:

В первом примере у Антона есть один икосаэдр, один куб, один тетраэдр и один додекаэдр. У икосаэдра 20 граней, у куба — 6, у тетраэдра — 4 и, наконец, у додекаэдра — 12. Итого 20 + 6 + 4 + 12 = 42 грани.

  1. Ответ на вопрос
    Ответ на вопрос дан Oxmieeee4on

    Это паскаль попробуй на си перевести

    var

    a:string;

    n,k,i:integer;

    begin

    readln(n);

    for i:=1 to n do begin

    readln(a);

    case a[1] of

    'T':k:=k+4;

    'C':k:=k+6;

    'O':k:=k+8;

    'D':k:=k+12;

    'I':k:=k+20;

    end;

    end;

    writeln(k);

    end.

  2. Ответ на вопрос
    Ответ на вопрос дан alixey2003

    var

    a:string;

    n,k,i:integer;

    begin

    readln(n);

    for i:=1 to n do begin

    readln(a);

    case a[1] of

    'T':k:=k+4;

    'C':k:=k+6;

    'O':k:=k+8;

    'D':k:=k+12;

    'I':k:=k+20;

    end;

    end;

    writeln(k);

    end.

Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.