Составьте программу позволяющую найти долю согласных букв в строке не содержащей знаков препинания
213
227
Ответы на вопрос:
Program enot; var s: string; a: char; b,n,h,i: integer; l: real; begin read(s); n: = length(s); h: =0; for i: = 1 to n do case s[i] of 'ы': h: =h+1; 'у': h: =h+1; 'е': h: =h+1; 'и': h: =h+1; 'а': h: =h+1; 'о': h: =h+1; 'ё': h: =h+1; 'э': h: =h+1; 'ю': h: =h+1; 'я': h: =h+1; end; b: =n-h; l: =b/n; writeln(l: 4: 2); end.
// pascalabc.net 3.2, сборка 1485 от 15.06.2017 // внимание! если программа не работает, обновите версию! begin var a: =readarrinteger('кол-во красных, зеленых и синих кубиков: ',3); a.sort; var k: =a[0]*3; a[1]-=a[0]; a[2]-=a[0]; // тройки if a[1]> 0 then begin k+=a[1]*2; a[2]-=a[1]; // пары end; if a[2]> 0 then k+=1; // последний writeln('максимальное количество в ряду равно ',k) end. пример кол-во красных, зеленых и синих кубиков: 8 2 5 максимальное количество в ряду равно 13
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
рем210702.08.2021 16:36
-
джанил22.01.2022 13:48
-
Алина1111778488484807.12.2022 20:24
-
misskuleshova10.10.2022 21:34
-
dogs9125.06.2023 05:07
-
kadri122.03.2022 05:53
-
BlackVaiNor27.12.2022 11:15
-
Ekaterinazuzu25.02.2022 20:45
-
alina0000000p08.02.2023 06:15
-
aisasiada02.06.2022 05:01
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.