Pascal дан текст, состоящий из латинских букв. вывести все буквы, входящие в текст не менее двух раз.
136
304
Ответы на вопрос:
//pascalabc.net 3.0, сборка 1066 const lett=['a'..'z']; var s: string; f: array['a'..'z'] of byte; i: integer; c: char; begin for c: ='a' to 'z' do f[c]: =0; write('введите строку: '); readln(s); for i: =1 to length(s) do if s[i] in lett then inc(f[s[i]]); for c: ='a' to 'z' do if f[c]> 1 then write(c,' '); writeln end. тестовое решение: введите строку: the quick brown fox jumps over the lazy dog e h o r u
А) объект: человек, свойство: цвет волос, величина свойства: рыжий. б) объект: арбуз, свойство: вес, величина свойства: 7 кг в) объект: чашка, свойство: материал, величина свойства: фарфор г) объект: монитор, свойство: длина диагонали экрана, величина свойства: 17 дюймов
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Romaniopatronys16.04.2021 10:10
-
help101010010102034930.10.2022 17:21
-
pd10103.02.2021 02:56
-
Yablochkho14.02.2021 04:35
-
НастМал09.01.2023 19:35
-
доминик1327.11.2022 10:17
-
ангел70929.01.2022 02:23
-
Marry88813.06.2022 11:18
-
lalalypsik01.10.2020 22:41
-
nikfyodorov2021.11.2022 10:02
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.