Есть ответ 👍

По программированию на паскаль, нужна . дана строка состоящая из строчных букв алфавита. необходимо определить какие буквы встречаются в этой строке больше одного раза. формат входных файлов: входной файл содержит одну строку s длиной не более чем 100 символов, состоящую из букв a,b, выходной файл должен содержать в алфавитном порядке последовательность букв строки s, которые встречаются в ней больше одного раза. каждая буква выводится не больше одного раза.

171
212
Посмотреть ответы 3

Ответы на вопрос:


Var t1,t2: text; s: string; k: array['a'..'z']of integer; i: integer; c: char; begin assign(t1,'input.txt'); reset(t1); assign(t2,'output.txt'); rewrite(t2); readln(t1,s); for c: ='a' to 'z' do k[c]: =0; for i: =1 to length(s) do k[s[i]]: =k[s[i]]+1; for c: ='a' to 'z' do   if k[c]> 1 then write(t2,c); writeln(t2); close(t1); close(t2); end. пример: файл input.txt: xyzabcdefgabcdx файл output.txt abcdx
alatireva
4,4(74 оценок)

// pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! begin   var s: =readalltext('input.txt');   writealltext('output.txt',s.groupby(c-> c).select(t-> (t.key,t.count))           .where(t-> t[1]> 1).select(t-> t[0]).orderby(t-> t).joinintostring('')) end. пример во входном файле input.txt записана строка petrwpoqwwefrnmvndihbgfuiusbnyaysinrivniweuwepkwqeofkwpr в выходном файле output.txt будет получена строка befiknopqrsuvwy

n = int(input())

for i in range(1,n+1):

   print("2"*i,end=" + ")

print("2"*(n+1))

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS