Проверьте программу, кто хорошо разбирается в программировании. program p7; var s: string; k,c,n,i,v: byte; t: string begin write ('na ulite sneg'); readln (s); n: =legth (s); for i: =1 to n do case s[i] of ' ': k: =k+1; end; writeln ('kolicestvo clov,'k); for i: =1 to n do case s[i] of ',' , '; ' , '.' , '! ' ,': ', ' end; writeln ('kolicestvo znakov prepinania',k); for i: =1 to n do case s[c] of 'b','c','d','f','g','k','l','m','n','p','r','s',t': k : =k+1 writeln('kolicestvo soglasnih, k); readkey end.
144
245
Ответы на вопрос:
Program p7; var s: string; n,k1,k2,k3,i: byte; begin writeln('введите строку: '); readln (s); n: =length (s); k1: =0; k2: =0; k3: =0; for i: =1 to n do case s[i] of ' ' : k1: =k1+1; ',','; ','.','! ',': ','? ' : k2: =k2+1; 'b','c','d','f','g','k','l','m','n','p','r','s','t': k3: =k3+1 end; writeln ('kolicestvo clov = ',k1+1); writeln ('kolicestvo znakov prepinania = ',k2); writeln('kolicestvo soglasnih = ', k3); readkey end. пример: введите строку: na ulite sneg. kolicestvo clov = 3 kolicestvo znakov prepinania = 1 kolicestvo soglasnih = 6
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ladykaden29.09.2021 04:41
-
Anonim78e23.06.2023 16:45
-
layma4518.03.2020 18:46
-
1508215.07.2021 07:39
-
инкндкн08.04.2022 06:34
-
sashaorlov200630.06.2022 00:58
-
ruslan42614.07.2022 21:17
-
qwertyzored21.02.2020 08:32
-
Fakins22.04.2021 17:32
-
yanoobhelpme16.01.2022 21:45
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.