Практикум по программированию на языке Turbo Pascal. Часть 2. Портнягина В.В - 53 стр.

UptoLike

ВУЗ: 

КамчатГТУ | Петропавловск-Камчатский

Составители: 

Рубрика: 

Задача 4
Ввести строку символов и сформировать из нее множе-
ство Lat, содержащее латинские буквы из входной строки;
Program Lab4_4;
Uses Crt;
Var Lat : Set Of ' A ' .. ' Z ';
C, i : Char;
Begin
ClrScr;
ReadLn;
Lat : = []
Write ('Введите строку');
Repeat
Read (C);
If C In ['A' .. 'Z ']
Then Lat : = Lat + [C];
Until Eoln;
{Вывод множества Lat}
WriteLn ('Латинские буквы');
For I : = ' A ' To ' Z ' Do
If i In Lat
Then Write (i : 2);
End.
Протокол работы программы. Введите строку: 45АFYB. Ла-
тинские буквы.
A B F Y
3. Контрольные вопросы
1. Какие типы данных используются в качестве базовых
при построении множественных типов?
2. Может ли базовый тип множества быть вещественным?
3. В каких пределах можно изменять количество эле-
ментов, входящих во множество?
4. Может ли множество не содержать ни одного элемента?
5. Как обозначается пустое множество?
6. Какой объем памяти занимает один элемент множества?
7. Каково внутреннее представление множества?
8. Может ли множество содержать элементы различных
типов?
53
    Задача 4
    Ввести строку символов и сформировать из нее множе-
ство Lat, содержащее латинские буквы из входной строки;
    Program Lab4_4;
    Uses Crt;
    Var Lat : Set Of ' A ' .. ' Z ';
    C, i : Char;
    Begin
    ClrScr;
    ReadLn;
    Lat : = []
    Write ('Введите строку');
    Repeat
    Read (C);
    If C In ['A' .. 'Z ']
    Then Lat : = Lat + [C];
    Until Eoln;
    {Вывод множества Lat}
    WriteLn ('Латинские буквы');
    For I : = ' A ' To ' Z ' Do
    If i In Lat
    Then Write (i : 2);
    End.
    Протокол работы программы. Введите строку: 45АFYB. Ла-
тинские буквы. A B F Y

    3. Контрольные вопросы
    1. Какие типы данных используются в качестве базовых
при построении множественных типов?
    2. Может ли базовый тип множества быть вещественным?
    3. В каких пределах можно изменять количество эле-
ментов, входящих во множество?
    4. Может ли множество не содержать ни одного элемента?
    5. Как обозначается пустое множество?
    6. Какой объем памяти занимает один элемент множества?
    7. Каково внутреннее представление множества?
    8. Может ли множество содержать элементы различных
типов?
                           53

Страницы