Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
lordvain
0 / 0 / 0
Регистрация: 26.05.2015
Сообщений: 5
#1

Вывести общие буквы исходных множеств - Pascal ABC

27.05.2015, 07:22. Просмотров 389. Ответов 1
Метки нет (Все метки)

помогите сделать.Даны два непустых множества прописных и строчных букв. Написать программу, которая выводит общие буквы исходных множеств
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.05.2015, 07:22
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вывести общие буквы исходных множеств (Pascal ABC):

Множества: вывести напечатать общие элементы двух множеств
Пусть заданы множество А и множество В целых чисел, вывести напечатать общие...

Найти общие элементы двух множеств и вычислить их сумму
Нужно задать множества А и B. Пользователь должен ввести двузначные числа в...

Напечатать общие элементы множеств и количество таких элементов
Пусть заданы множество А и множество В целых чисел, напечатать общие элементы...

Напечатать общие четные элементы двух множеств и количество таких элементов
5. Пусть заданы множество А и множество В целых чисел, напечатать общие четные...

Даны три слова.Напечатать их общие буквы. Повторяющиеся буквы каждого слова не рассматривать.
1 - Строки. Даны три слова.Напечатать их общие буквы. Повторяющиеся буквы...

общие буквы 3 слов
даны 3 слова.напечатать из общие буквы.повторяющиеся буквы каждого слова не...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3858 / 2845 / 3631
Регистрация: 05.06.2014
Сообщений: 13,943
27.05.2015, 19:23 #2
Лучший ответ Сообщение было отмечено lordvain как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
{Даны два непустых множества прописных и строчных букв. Написать программу,
которая выводит общие буквы исходных множеств}
var
  x,y,z:set of char;
  c:char; 
begin
  x:=['A','b'];
  y:=['a','b'];
  z:=x*y;
  for c:=#32 to #255 do
    if c in z then
      write(c);
  readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.05.2015, 19:23
Привет! Вот еще темы с решениями:

Определить и вывести общие цифры двух чисел
определить и вывести общие числа двух цифр в pascal. например, вводим числа...

Даны 3 строки Вывести на экран общие символы этих строк
1. Даны 3 строки. Вывести на экран общие символы этих строк.

Вывести строку, содержащий символы, присутствующие в обеих исходных
Составить программу используя подпрограммы , которая вводит два стринга str1 и...

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


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru