Дана последовательность символов за которой следует точка (Все готовые лабы по паскалю)
Описание файла
Файл "Дана последовательность символов за которой следует точка" внутри архива находится в следующих папках: 1kyrs_1semestr_paskal_labworks, 8 лабораторка. Документ из архива "Все готовые лабы по паскалю", который расположен в категории "". Всё это находится в предмете "информатика" из 1 семестр, которые можно найти в файловом архиве МГТУ им. Н.Э.Баумана. Не смотря на прямую связь этого архива с МГТУ им. Н.Э.Баумана, его также можно найти и в других разделах. Архив можно найти в разделе "лабораторные работы", в предмете "информатика" в общих файлах.
Онлайн просмотр документа "Дана последовательность символов за которой следует точка"
Текст из документа "Дана последовательность символов за которой следует точка"
Дана последовательность символов, за которой следует точка. Создать множества латинских букв из данной последовательности символов и распечатать это множество в алфавитном порядке.
-
Текст программы:
var
s:string;
latset:set of 'A'..'z';
i:integer;
ch:char;
begin
readln(s);
i:=1;
while s[i]<>'.' do begin
include(latset,s[i]);
inc(i);
end;
for ch:='A' to 'z'do
if ch in latset then
write(ch);
readln;
end.
-
Исходные данные: dfbfcbdjghdkjvndfg. Результата: bcdfghjknv
нет