Вывести символы латинского алфавита нижнего регистра, НЕ встречающихся в строке, в алфавитном порядке

@Legioner · Регистрация: 14.05.2009

Студворк — интернет-сервис помощи студентам

Доброе время суток
помогите пожалуйста написать программу на паскале:написать программу, которая осуществляет ввод строки с клавиатуры, затем выводит на экран символы латинского алфавита нижнего регистра, НЕ встречающихся в строке, в алфавитном порядке.(Использовать тип можно для определения символов, отсутствующих в строке)

вот моё решение,но оно не правильное(нужно использовать другой тип данных-стринг,и моя работает только после нажатия в конце предложения точки,чего не должно быть)

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
uses crt;
 type
 Alf = set of 'a'..'z';
 var
 i, j : integer;
 x : Alf;
 z : char;
 m : array[1..1000] of char;
 label zicl;
 begin
 clrscr;
 x:=['a'..'z'];
 i:=0;
 repeat
 i:=i+1;
 read(m[i]);
 if m[i]=#46 then goto zicl;
 write(m[i]);
 until i=1000;
 zicl: begin {clrscr;}
 for j:=1 to i-1 do  begin
     exclude(x, m[j]);
     end;
     end;
 for z:='a' to 'z' do begin
 if z in x then write(z);
 end;
     writeln;
 end.

был бы очень признателен

@MrAndrey_ka · 14.05.2009, 21:05

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses crt;
type
Alf = set of 'a'..'z';
var
i, j : integer;
x : Alf;
z : char;
m : string;
begin
clrscr;
x:=['a'..'z'];
writeln('Введите строку:');
readln(m);
i:=length(m);
for j:=1 to i do 
exclude(x, m[j]);
for z:='a' to 'z' do 
begin
if z in x then 
write(z);
end;
writeln;
end.

должно работать! Пробуй

@Legioner · 15.05.2009, 20:51 **[ТС]**

Спасибо большое!

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Legioner 0 / 0 / 0 Регистрация: 14.05.2009 Сообщений: 5
	15.05.2009, 20:51 [ТС]
	Спасибо большое! 0