количество прописных латинских букв

@Bek · Регистрация: 08.01.2010

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

Привет всем.Если поможете буду очень признательна.Если не сделаете, все равно огромное спасибо.
Определить количество прописных латинских букв в заданной строке

@Тамила · 08.01.2010, 18:23

Pascal

uses crt;
var
s:string;
i,kol:integer;
begin clrscr;
write('vvodim stroku:  ');
readln(s);
kol:=0;
for i:=1 to length(s) do
if s[i] in ['A'..'Z'] then inc(kol);
writeln;
writeln('kol-vo propisnyh bukv= ', kol);
readkey;
end.

@WolfCF · 08.01.2010, 18:24

Pascal

var
 S: string;
 i,k: longint;
Begin
 write('Введите: ');
 readln(S);
 k:=0;
 for i:=1 to length(S) do
  if S[i] in ['a'..'z'] then inc(k);
 writeln('В тексте ',k);
 readln;
End.

Не по теме:

Тамила, одинаково))

@Тамила · 08.01.2010, 18:27

Сообщение от Тамила

['A'..'Z']

здесь должно быть иначе...ошиблась...

Pascal

1	['a'..'z']

@Puporev · 08.01.2010, 18:28

Wolf, Не не одинаково. В задании прописные буквы, а не все. Вот у Тамилы правильно, а у тебя как всегда.

@Тамила · 08.01.2010, 18:28

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

Не по теме:
Тамила, одинаково))

Не по теме:

Да, только вроде нужны только прописные буквы.

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

if S[i] in ['a'..'z','A'..'Z'] then inc(k);

@Puporev · 08.01.2010, 18:29

Тамила, У Вас правильно было, прописные буквы, это заглавные, а маленькие называются строчные.

@WolfCF · 08.01.2010, 18:30

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

у тебя как всегда.

исправил.

@Тамила · 08.01.2010, 18:30

Не по теме:

Puporev, я уже сама себе противоречу... да, конечно... первый вариант правильный.
У меня после экзамена еще мандраж не прошел...

@Bek 1 / 1 / 0 Регистрация: 08.01.2010 Сообщений: 4
		1
	количество прописных латинских букв 08.01.2010, 18:13. Показов 1999. Ответов 8 Метки нет (Все метки) Привет всем.Если поможете буду очень признательна.Если не сделаете, все равно огромное спасибо. Определить количество прописных латинских букв в заданной строке 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	08.01.2010, 18:28	5
	Wolf, Не не одинаково. В задании прописные буквы, а не все. Вот у Тамилы правильно, а у тебя как всегда. 1

@Тамила 753 / 546 / 211 Регистрация: 12.11.2009 Сообщений: 1,100
	08.01.2010, 18:28	6
	Сообщение от Wolf Не по теме: Тамила, одинаково)) Не по теме: Да, только вроде нужны только прописные буквы. Сообщение от Wolf if S[i] in ['a'..'z','A'..'Z'] then inc(k); 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	08.01.2010, 18:29	7
	Тамила, У Вас правильно было, прописные буквы, это заглавные, а маленькие называются строчные. 1

@WolfCF 3310 / 1372 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	08.01.2010, 18:30	8
	Сообщение от Puporev у тебя как всегда. исправил. 0

@Тамила
	08.01.2010, 18:30 количество прописных латинских букв #9
	Не по теме: Puporev, я уже сама себе противоречу... да, конечно... первый вариант правильный. У меня после экзамена еще мандраж не прошел... 0

Опции темы