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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.11.2008, 17:37   #1
Sabber
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 23
Смущение Пожалуйста, помогите решить задачу на "строки"

Задан текст, состоящий из слов, записанных через пробелы или запятые. Длина текста не больше 255 символов. В тексте могут быть использованы любые символы. Словом считать последовательность символов, не содержащую пробел. Необходимо введенный текст вывести на экран до и после его преобразования.
Распечатать слова " перевёртыши ", найти сумму цифровых слов текста. Найти первое цифровое слово и уменьшить его значение на 100.

Решите пожалуйста если кто может, пытался, пытался, ничего не получается.
Sabber вне форума Ответить с цитированием
Старый 25.11.2008, 23:55   #2
Викдон
Форумчанин
 
Аватар для Викдон
 
Регистрация: 11.11.2008
Сообщений: 161
По умолчанию

а зачем тгда читать такой бред в строке как: ';[p[5[;/;!#!$% ? может только буквы и цифры?
Викдон вне форума Ответить с цитированием
Старый 26.11.2008, 00:03   #3
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 16,216
По умолчанию

Цитата:
пытался, пытался
Покажите, что Вы сделали, когда пытались.
Arigato вне форума Ответить с цитированием
Старый 26.11.2008, 06:43   #4
Sabber
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 23
По умолчанию

Program string;

Const size=255;

Var

I,j,k: integer;

List:array[1..255] of string;

Begin

Writeln(' Введите ' , n , ' символов текста');

For i:=1 to n do

begin write(i,' -я строка');

readln(list[i]);

end;


writeln;

for i:=1 to size do

begin

j:=0; repeat j:=j+1 until list[j]<>'';

for k:=j+1 to n do.....

вот. незнаю что делать дальше.
помогите ёё доделать пожалуйста очень надо.
Sabber вне форума Ответить с цитированием
Старый 26.11.2008, 11:37   #5
Викдон
Форумчанин
 
Аватар для Викдон
 
Регистрация: 11.11.2008
Сообщений: 161
По умолчанию

List:array[1..255] of string; можно и просто строкой воспользоваться List:string;
И слова вводятся через один пробел? или можно несколько использовать?

Последний раз редактировалось Викдон; 26.11.2008 в 12:06.
Викдон вне форума Ответить с цитированием
Старый 27.11.2008, 13:20   #6
Sabber
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 23
По умолчанию

наверно можно Я вообще не понял если честно условия задачи, может поможите решить, очень надо!
Sabber вне форума Ответить с цитированием
Старый 27.11.2008, 14:43   #7
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Цитата:
Задан текст, состоящий из слов, записанных через пробелы или запятые.
Цитата:
Словом считать последовательность символов, не содержащую пробел.
А запятые?
Цитата:
Необходимо введенный текст вывести на экран до и после его преобразования.
Какого преобразования?
puporev вне форума Ответить с цитированием
Старый 27.11.2008, 15:25   #8
Sabber
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 23
По умолчанию

Распечатать слова " перевёртыши ", найти сумму цифровых слов текста. Найти первое цифровое слово и уменьшить его значение на 100

а потом выводить текст до и после преобразования

запятые не надо, пишим через пробел
Sabber вне форума Ответить с цитированием
Старый 27.11.2008, 16:01   #9
Викдон
Форумчанин
 
Аватар для Викдон
 
Регистрация: 11.11.2008
Сообщений: 161
По умолчанию

слова "перевертышы" ето как: ротор ? или просто перевернуть слово)
Викдон вне форума Ответить с цитированием
Старый 27.11.2008, 17:21   #10
Sabber
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 23
По умолчанию

Я понял что надо наоборот, а как это сделать? Код проги я не могу написать, в этом вя проблема
Sabber вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нужно решить и объяснить задачу "В режиме точечной графики попиксельно вывести фразу" Eyeless Фриланс 3 10.01.2008 10:56
Помогите решить задачу в VBA "Температура человека" Versifikator Помощь студентам 1 06.12.2007 23:58
Помогите решыть интересную задачу "Конкурс красоты" на Pascale Haret Помощь студентам 3 09.12.2006 16:19