Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.04.2011, 17:01   #1
malenkaya
Пользователь
 
Регистрация: 03.02.2011
Сообщений: 15
По умолчанию паскаль - Множества

Подсчитать общее количество цифр и знаков '+', '-', и '*', входящих в строку s
malenkaya вне форума Ответить с цитированием
Старый 22.04.2011, 17:05   #2
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

Код:
var s:string;i,c:integer;
begin
readln(s);
c:=0;
for i:=1 to Length(s) do
if s[i] in ['+', '-', '*','0'..'9'] then c:=c+1;
writeln(c);
readln;
end.
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"

Последний раз редактировалось Mad_Cat; 22.04.2011 в 23:18.
Mad_Cat вне форума Ответить с цитированием
Старый 22.04.2011, 22:46   #3
Biggs
Пользователь
 
Регистрация: 15.07.2010
Сообщений: 74
По умолчанию

Там еще и цифры спрашивали-
Biggs вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Множества, Паскаль bwitcher Помощь студентам 1 15.03.2011 16:34
паскаль (множества) masterlomaster Помощь студентам 7 08.03.2011 21:19
Паскаль Множества vacia78 Помощь студентам 3 09.04.2009 22:10