Вывести буквы повторяющиеся в обоих введённых словах только один раз

03.02.2017, 13:38. Показов 1129. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Пример:
1-ое слово : привет
2-ое слово: андрей

Должно выводить: ре (Выводит с данным кодом - пивтандй)

Имеется данный код. Работает не корректно. (Объединение строк, закомментировал, т.к я понимаю оно не нужно.) Делал s1 and s2 Всё равно не работало.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 uses crt;
  var s1,s2,s:string;
    i,k,j:integer;
  begin
    write('Введите первое слово: ');
  readln(s1);
    write('Введите второе слово: ');
  readln(s2);
  //s:=s1+s2;{объединяем строки}
  i:=1;
   while i<=length(s) do{пока меньще чем длинна строки }
 begin
   k:=0;
  for j:=length(s) downto i+1 do{идем от конца строки к текущему символу}
    if s[j]=s[i] then{если нашли повторяющийся}
   begin
      k:=k+1;{считаем}
    delete(s,j,1);{удаляем его}
   end;
      if k=0 then write(s[i]);{если ни разу такой дальше по строке не попался, выводим его}
    i:=i+1;{и так до конца}
 end;
  readln;
 end.

Добавлено через 3 часа 6 минут
Исправил. Тема не актуальна.

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

03.02.2017, 13:38

Ответы с готовыми решениями:

Напечатать только те буквы слов, которые встречаются в обоих словах только один раз
Пожалуйста помогите!!!!задача на строки на С.Даны 2 слова.Напечатать только те буквы слов,которые встречаются в обоих словах только один...

Напечатать только те буквы слов, котрые встречаются в обоих словах только один раз
Помогите решить в Borland c++ Если можно еще блок-схему Заданы два слова. Напечатать только те буквы слов, котрые встречаются в...

Напечатать только те буквы слов, которые встречаются в обоих словах только один раз
2) Даны два слова. Напечатать только те буквы слов, которые встречаются в обоих словах только один раз. Например, если заданные слова...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

03.02.2017, 13:38

Помогаю со студенческими работами здесь

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

Напечатать только те буквы слов, которые встречаются в обоих словах только один раз java
Добрый день, нужна помощь с задачей: Даны два слова. Напечатать только те буквы слов, которые встречаются в обоих словах только один раз...

Даны два слова. Напечатать только те буквы слов, которые встречаются в обоих словах только один раз
Добрый день, нужна помощь с задачей: Даны два слова. Напечатать только те буквы слов, которые встречаются в обоих словах только один раз...

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

Даны два слова. Напечатать только те буквы слов, которые встречаются в обоих словах только один раз
Даны два слова. Напечатать только те буквы слов, которые встречаются в обоих словах только один раз. Например, если заданные слова...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

Наверх