Pascal. Строки

@Tsubak1 · Регистрация: 08.06.2011

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

Все согласные символы латиницы ,заданной строки, перевести в верхний регистр.

@SuPeR XaKer · 03.07.2011, 14:13

ну и?а как вы пробовали это сделать?

@Tsubak1 · 03.07.2011, 14:20 **[ТС]**

Я в строках не разбираюсь совсем, пытался что-то почитать в книгах и т.д, но так и не разобрался как ,что и куда.

@lamed · 03.07.2011, 14:34

Pascal

{ Все согласные символы латиницы заданной строки перевести в верхний регистр }
const
  consonants = ['b'..'d','f'..'h', 'j'..'n', 'p'..'t', 'v'..'z'];
var
  s: string;
  i: integer;
  d: integer;
begin
  d:= ord('A')-ord('a');
  readln(s);
  for i:= 1 to length(s) do
    if (s[i] in consonants) then
      s[i] := chr(ord(s[i])+d);
  writeln(s);
end.

@SuPeR XaKer · 03.07.2011, 14:35

Pascal

Var
 s:string;
 i:byte;
begin
readln(s);
for i:=1 to length(s) do
if UpCase(s[i]) in ['B','C','D','F','G','H','J','K','L','M','N','P','Q','R','S','T', 'V','W','X','Z'] then
 s[i]:=UpCase(s[i]);
writeln(s);
readln
end.

да чёт я перегрелся

UpCase(s[i]) in ['B','C','D','F','G','H','J','K','L','M','N','P','Q','R','S','T', 'V','W','X','Z']

на маленькие буквы замените и UpCase уберите

Не по теме:

p.s: или мне было лень вручную печатать буквы :D

@Puporev · 03.07.2011, 14:35

Pascal

'v'..'z'

не пойдет, там есть 'y'.

@lamed · 03.07.2011, 14:44

Puporev,
How many vowels are there in english alphabet
The 5 traditional vowels are A, E, I, O, and U. However, in English the the letters W and Y can also represent vowel sounds, but they don't always do so. Hence, they may be considered vowels "sometimes".
http://wiki.answers.com/Q/How_... h_language

@Tsubak1 · 03.07.2011, 14:44 **[ТС]**

Спасибо огромное

@Puporev · 03.07.2011, 14:51

Алфавит английского языка основан на латинском и состоит из 26 букв, из них 6 гласных и 20 согласных.
Гласные: A, E, I, O, U, Y
Согласные: B, C, D, F, G, H, J, K, L, M, N, P, Q, R, S, T, V, W, X, Z

http://ru.wikipedia.org/wiki/%... 0%B8%D1%82

Добавлено через 4 минуты
И еще о латинском(не английском)...

Буква y (ипсилон), заимствованная из греческого языка, произносится всегда так, как гласный i, в связи с чем во французском языке она получила название "игрек" (букв. "греческое и"): pterygoideus [птэригоидэус] - крыловидный, symbiosis [симбиозис] - симбиоз, zygota [зигота] - зигота.

@lamed · 03.07.2011, 15:11

"In written English, . . . the 26 letters of the alphabet comprise 5 vowels and 21 consonants."
(David Crystal, How Language Works. Overlook Press, 2006)

http://grammar.about.com/od/tz/g/vowelterm.htm

The letters A, E, I, O, U are the called vowels. The other letters in the alphabet are called consonants.

http://www.grammar-monster.com/glossary/vowels.htm

...perhaps for this reason Y tends traditionally to be counted among the consonants.

http://oxforddictionaries.com/page/yvowelconsonant

@Puporev · 03.07.2011, 15:53

Что Вы пристали с английским языком. В задании написано

Сообщение от Tsubak1

согласные символы латиницы

@lamed 298 / 298 / 150 Регистрация: 07.05.2011 Сообщений: 592
	03.07.2011, 15:11	10
	"In written English, . . . the 26 letters of the alphabet comprise 5 vowels and 21 consonants." (David Crystal, How Language Works. Overlook Press, 2006) http://grammar.about.com/od/tz/g/vowelterm.htm The letters A, E, I, O, U are the called vowels. The other letters in the alphabet are called consonants. http://www.grammar-monster.com/glossary/vowels.htm ...perhaps for this reason Y tends traditionally to be counted among the consonants. http://oxforddictionaries.com/page/yvowelconsonant 0

@Tsubak1 0 / 0 / 0 Регистрация: 08.06.2011 Сообщений: 5
		1
	Pascal. Строки 03.07.2011, 13:59. Показов 608. Ответов 10 Метки нет (Все метки) Все согласные символы латиницы ,заданной строки, перевести в верхний регистр. 0

@SuPeR XaKer 2857 / 1986 / 788 Регистрация: 23.09.2010 Сообщений: 4,877
	03.07.2011, 14:13	2
	ну и?а как вы пробовали это сделать? 0

@Tsubak1 0 / 0 / 0 Регистрация: 08.06.2011 Сообщений: 5
	03.07.2011, 14:20 [ТС]	3
	Я в строках не разбираюсь совсем, пытался что-то почитать в книгах и т.д, но так и не разобрался как ,что и куда. 0

@lamed 298 / 298 / 150 Регистрация: 07.05.2011 Сообщений: 592
	03.07.2011, 14:44	7
	Puporev, How many vowels are there in english alphabet The 5 traditional vowels are A, E, I, O, and U. However, in English the the letters W and Y can also represent vowel sounds, but they don't always do so. Hence, they may be considered vowels "sometimes". http://wiki.answers.com/Q/How_... h_language 0

@Tsubak1 0 / 0 / 0 Регистрация: 08.06.2011 Сообщений: 5
	03.07.2011, 14:44 [ТС]	8
	Спасибо огромное 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	03.07.2011, 14:51	9
	Алфавит английского языка основан на латинском и состоит из 26 букв, из них 6 гласных и 20 согласных. Гласные: A, E, I, O, U, Y Согласные: B, C, D, F, G, H, J, K, L, M, N, P, Q, R, S, T, V, W, X, Z http://ru.wikipedia.org/wiki/%... 0%B8%D1%82 Добавлено через 4 минуты И еще о латинском(не английском)... Буква y (ипсилон), заимствованная из греческого языка, произносится всегда так, как гласный i, в связи с чем во французском языке она получила название "игрек" (букв. "греческое и"): pterygoideus [птэригоидэус] - крыловидный, symbiosis [симбиозис] - симбиоз, zygota [зигота] - зигота. 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	03.07.2011, 15:53	11
	Что Вы пристали с английским языком. В задании написано Сообщение от Tsubak1 согласные символы латиницы 0

Опции темы