Строка: Построить множество, где элементами являются символы, встречающиеся в заданной последовательности...

@Ekaterina_A · Регистрация: 21.11.2016

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

Дана последовательность символов. Нужно построить множество, элементами которого являются символы, встречающиеся в последовательности: Буквы от А до F и от Х до Z. (на паскале)

@cfbogd · 10.12.2016, 22:20

Ekaterina_A, писал на PascalABC.NET :

Pascal

const n=40;
alph='QWERTYUIOPASDFGHJKLZXCVBNM';
var ch,ch2:array of char;
a,k:integer;
begin
a:=0; k:=0;
setlength(ch,n); setlength(ch2,n);
for var i:=0 to n-1 do
begin
ch[i]:=alph[1+random(length(alph))];
write(ch[i]:2);
end;
writeln;
for var i:=0 to n-1 do
if ch[i] in ['A'..'F','X'..'Z'] then 
begin
ch2[a]:=ch[i];
write(ch2[a]:2);
inc(k); inc(a);
end;
setlength(ch2,k);
end.

@Ekaterina_A 0 / 0 / 0 Регистрация: 21.11.2016 Сообщений: 49
		1
	Строка: Построить множество, где элементами являются символы, встречающиеся в заданной последовательности... 10.12.2016, 21:44. Показов 1587. Ответов 1 Метки нет (Все метки) Дана последовательность символов. Нужно построить множество, элементами которого являются символы, встречающиеся в последовательности: Буквы от А до F и от Х до Z. (на паскале) 0

	10.12.2016, 22:20

Опции темы

Строка: Построить множество, где элементами являются символы, встречающиеся в заданной последовательности...

Решение