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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 18.11.2012, 16:17   #1
arsenthy
Новичок
Джуниор
 
Регистрация: 18.11.2012
Сообщений: 2
По умолчанию Задачи паскаль

Символьные массивы. Тип string.
1.Проверить, есть ли в тексте слово с 3-х букв. Если есть, удалить.
2.Проверить, состоит ли текст только из цифр.
3.Проверить есть ли в тексте слова, которые кончаются на "з"
Если есть, то вычислить их количество и удвоить их.
4.Проверить, есть ли в тексте слово с 2-х букв. Если есть, то удалить его.
Помогите пожалуйста.
arsenthy вне форума Ответить с цитированием
Старый 19.11.2012, 06:59   #2
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

Цитата:
Проверить, состоит ли текст только из цифр.
Код:
var i:integer;f:boolean;t:string;
begin
readln(t);
f:=true;
For i:=1 to Length(t) do
if not (t[i] in ['0'..'9']) then begin f:=false;break;end;
if f then writeln('Only Digits') else writeln('Not Only Digits');
readln;
end.
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"
Mad_Cat вне форума Ответить с цитированием
Старый 19.11.2012, 09:35   #3
arsenthy
Новичок
Джуниор
 
Регистрация: 18.11.2012
Сообщений: 2
По умолчанию !!

Пасиб, большое.))
arsenthy вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль. Задачи Мария_* Паскаль, Turbo Pascal, PascalABC.NET 0 26.04.2011 15:33
Задачи по Паскаль GgGgGgGg Паскаль, Turbo Pascal, PascalABC.NET 0 01.03.2011 23:26
Задачи (Паскаль) enigma011 Помощь студентам 3 05.07.2009 16:51
задачи по Паскаль... Вера123 Помощь студентам 3 19.06.2009 19:23
Задачи Паскаль !!! andrey2 Помощь студентам 4 08.02.2009 19:21