Автор - 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 грани.

Ответ

Автор - 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.

Ответ

Автор - 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.

Ответы и объяснения

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.
© 2026 Все права защищены Политика конфиденциальности Контакты
search points attachment profile arrow left arrow right star heart verified symbols equation arrow-down question mark check menu accountancyadministrationagriculturalalgebraallarabicartart_musicbelarusbelarus_altbiologybusinesscatalachemistrychineseeconomicsegzamenglishentrepreneurshipenvironmentethicseuskarafirst_aidfrenchgalegogeographygeologygeometrygermangrammarhealthhistoryindia_langindonesian_langinformaticsitalianjapanesekazachkazach_altkoreanlanguagelatinlawlife_scienceliteraturelogicmathematicsmusicnigerian_langother_languagesotherspedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligionrpa_langrussianrussian_altsciencesecurityskillssocial_sciencesociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation accountancyadministrationagriculturalalgebraall_1arabicartart_music_2belarusbelarus_altbiologybusiness_2catalachemistry_1chineseeconomicsexam_3englishentrepreneurshipenvironment_2ethicseuskarasecurity_1frenchgalegogeography_4geology_4geometrygermangrammarhealthhistoryindia-langindonesian-langinformaticsitalianjapanesekazachAsset 230koreanlanguagelatinlawlife-scienceliteraturelogic_2mathematicsmusicnigerian-langotherlanguagesother_1pedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligion_1rpa-langrussianrussian_altsciencesecurity_3_mskills_1allsocial_science_5_msociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation