Задать вопрос
11 января, 07:59

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

+5
Ответы (1)
  1. 11 января, 10:36
    0
    Странноватая задача, конечно. Естественно, что в множестве нет порядка элементов, использование процедур (функций) здесь совершенно ни к чему. Если учитывать все требования, то получится весьма корявая программа. Примерно вот такая:

    var s, s1:string; i:integer;

    mn:set of 'a' ... 'z';

    function f (c:char; m:set of 'a' ... 'z') : boolean;

    begin

    f: = (not (c in m)) and (c in ['a' ... 'z'])

    end;

    begin

    writeln ('Введите строку:') ; readln (s) ;

    mn:=[]; s1:='';

    for i:=1 to length (s) do

    if f (s[i], mn) then

    begin

    mn:=mn+[s[i]]; s1:=s1+s[i];

    end;

    writeln (s1) ;

    end.

    Пример работы:

    Введите строку:

    this is an example text.

    thisanexmpl
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дан текст из строчных латинских букв, за которыми следует точка. Включить в множество первые вхождения букв в текст, сохраняя их исходный ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Тема Множества: Дан текст из строчных латинских букв, за которым следует точка. Напечатать: - все буквы, входящие в текст не менее двух раз; - все буквы, входящие в текст по одному разу. В Паскале АВС
Ответы (1)
Дана непустая последовательность слов из строчных латинских букв; между соседними словами - запятая, за последним словом - точка. Напечатать все буквы, которые входят в наибольшее количество слов этой последовательности. Писать на Pascal.
Ответы (1)
1. Переключение клавиатуры с режима ввода латинских букв на режим ввода русских букв и обратно? 2. переключение клавиатуры с режима ввода строчных букв на режим ввода прописных букв и обратно? 3.
Ответы (1)
Дана строка, состоящая из латинских строчных букв, заменить их аналогичными прописными буквами. Pascal ABC
Ответы (2)
Дана последовательность, содержащая от 2 до 30 слов, в каждом из от 1 до 8 символов строчных латинских букв между соседними словами-не менее одного пробела, за последним словом-точка.
Ответы (1)