1 / 1 / 0
Регистрация: 23.12.2013
Сообщений: 28
1

Написать программу, продлевающюю текст строки длинной не более чем на n символов, причем слова текста разрывать нельзя

14.01.2014, 14:45. Показов 941. Ответов 3
Метки нет (Все метки)

Написать программу, продливающюю текст строки длинной не более чем на n символов, причем слова текста разрывать нельзя.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.01.2014, 14:45
Ответы с готовыми решениями:

Написать программу, разбивающую текст на строки длиной не более N символов, причем слова текста разрывать нельзя
Написать программу, разбивающую текст на строки длиной не более N символов, причем слова текста...

Написать программу, разбивающую текст на строки длиной не более N символов, причем слова текста не разрывать
1.Есть ли в тексте символы «а» и «в»? 2. Написать программу, разбивающую текст на строки длиной не...

Текст, состоящий не более чем из 255 символов, разбить на строки длиной не более 50 символов в строке
Текст, состоящий не более чем из 255 символов, разбейте на строки длиной не более 50 символов в...

Удалить все слова из заданной строки длинной более k символов
Написать программу, которая удаляет все слова из заданной строки длинной более k ...

3
1646 / 1075 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
14.01.2014, 14:58 2
Просто добавить в конце пробелы - видимо не вариант? (слишком просто)
Надо именно "разрядить" слова в строке, наподобии как это делает Word?
0
1 / 1 / 0
Регистрация: 23.12.2013
Сообщений: 28
15.01.2014, 09:03  [ТС] 3
Да, на подобии worda!!!
0
1646 / 1075 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
15.01.2014, 10:19 4
Для TurboPascal требуется в 3-ей строчке указать: S : String;
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Function ExpandStr(St : String; N : Byte) : String;
Var nn : Byte;
    S  : ShortString;
Begin
  S:=St;
  nn:= Length(S);
  While Length(S)<N do
  Begin
    While (S[nn]<>' ') and (nn>0) do Dec(nn);
    If nn>0 then
    Begin
      Insert(' ',S,nn);
      Dec(nn)
    End
      else nn:=Length(S);
  End;
  ExpandStr:=S;
End;
 
Begin
  Writeln(ExpandStr('11  2222 333 4',28));
End.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.01.2014, 10:19
Помогаю со студенческими работами здесь

Объединить две строки s1 и s2, причем из второй строки копировать не более n символов
strncat - сцепить две строки s1 и s2, причем из второй строки копировать не более n...

Определить, содержит текст заданную строку длинной не более 255 из символов 0 и 1
Помогите пожалуйста в написании программы: Текст разбит на строки длиной не более 255 символов....

Написать программу разрешающую ввод строки не более 80 символов и вывод на экран этой строки красным цветом
Ассемблер. Написать программу разрешающую ввод строки не более 80 символов и вывод на экран этой...

Найти в тексте слова длинной более двух символов, отсортировать по алфавиту и записать в файл
Еще есть radio кнопки, если выбрана кнопка, то выводится соответствующий ей текст после основного...

Написать программу, которая считывает текст из файла и определяет, сколько в нем слов, состоящих не более чем из четырех
Помогите Написать программу, которая считывает текст из файла и определяет, сколько в нем слов,...

Написать программу которая считывает текст из файла и определяет, сколько в нем слов, состоящих из не более чем четырех букв.
Всем привет. Помогите с примером: Написать программу которая считывает текст из файла и определяет,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru