Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Maria_Добрая
0 / 0 / 0
Регистрация: 17.10.2010
Сообщений: 63
#1

Сформировать множества символов текстовых строк А, В и вывести элементы найденных множеств на экран. - Turbo Pascal

25.11.2012, 14:15. Просмотров 476. Ответов 1
Метки нет (Все метки)

Сформировать множества символов текстовых строк А, В и вывести элементы найденных множеств на экран. найти
символы строки А, которые не входят в строку В, и символы строки В, которые не входят в строку А.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.11.2012, 14:15
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Сформировать множества символов текстовых строк А, В и вывести элементы найденных множеств на экран. (Turbo Pascal):

Даны два множества из чисел M и T (сформировать из строк ) и вывести элементы множеств меньше 5 - Turbo Pascal
Всем доброе время суток помогите пожалуйста решить задачку Условие :Даны два множества из чисел M и T (сформировать из строк ) и вывести...

Для заданных двух текстовых строк выяснить, образуют они одинаковые множества символов - Turbo Pascal
Для заданных двух текстовых строк выяснить, образуют они одинаковые множества символов. решил как String,но надо в множестве! ...

Множества. Вывести на печать все элементы этих множеств - Turbo Pascal
ЦЕЛЬ РАБОТЫ. Освоение приемов объявления и использование структуры данных множества при решении задач. Задача - Пусть заданы множество А...

Из введенного множества символов сформировать и вывести множество, исключающее все цифры - Pascal
Ребят, в чем ошибка??? Задание: "Из введенного множества символов сформировать и вывести множество, исключающее все цифры. При ре-шении...

Вывести на экран все общие и разные элементы двух множеств - Turbo Pascal
написать программу на языке TP 7.0: Дано множества А и В, елементы которых записаны в множестве С. Вывести на екран все общие и разные...

Дано N множеств, состоящих из целых чисел. Вывести на экран элементы, принадлежащие всем множествам - Turbo Pascal
Здравствуйте помогите пожалуйста решить) Цель: Решыть программу на языке Turbo Pascal для решения задачи. Задание:Данная N...

1
CodeR
Фрилансер
3379 / 2781 / 788
Регистрация: 08.02.2012
Сообщений: 6,617
Записей в блоге: 1
25.11.2012, 14:38 #2
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
25
26
27
28
29
30
Var A,B:string;
    m1,m2,m3:set of char;
    i:byte;
Begin
    write('Введите строку A: ');readln(a);
    write('Введите строку B: ');readln(b);
    m1:=[];m2:=[];
    For i:=1 to Length(a) do
     m1:=m1+[a[i]];
    For i:=1 to Length(b) do
     m2:=m2+[b[i]];
    writeln('множество символов строки A');
    For i:=0 to 255 do
     if chr(i) in m1 then write(chr(i):2);
    writeln;
    writeln('множество символов строки B');
    For i:=0 to 255 do
     if chr(i) in m2 then write(chr(i):2);
    writeln;
    writeln('Множество символов которые не входят в B но входят в A');
    m3:=m1-m2;
    For i:=0 to 255 do
     if chr(i) in m3 then write(chr(i):2);
    writeln;
    writeln('Множество символов которые не входят в A но входят в B');
    m3:=m2-m1;
    For i:=0 to 255 do
     if chr(i) in m3 then write(chr(i):2);
    readln;
End.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.11.2012, 14:38
Привет! Вот еще темы с ответами:

Найти минимальные элементы строк и максимальный из найденных. - Turbo Pascal
Помогите,пожалуйста,сделать задачку. Заранее благодарен.

Выяснить, образуют две текстовых строки одинаковые множества символов - Turbo Pascal
Помогите пож-та решить выяснить, образуют две текстовых строки одинаковые множества символов

С помощью множества нужно вывести на экран строку в который идут по порядку цифры и буквы из строк которые ввел пользователь - Turbo Pascal
Всем привет!! Не могли бы написать программу ?? Пользователь вводит 2 строки которые состоят из букв(англ) и цифр(1..9) С помощью...

Множества. Осуществить ввод элементов двух множеств и проверить, принадлежат ли элементы их пересечению - Turbo Pascal
осуществить ввод элементов двух заданных множеств с клавиатуры и проверить принадлежат ли элементы(так же вводимые с клавиатуры) их...


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

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

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