IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Работа со строками, разбить строку на-слова-буквы
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 4
Пол: Мужской
Реальное имя: Владимир

Репутация: -  0  +


Каким образом можно разбить строку на слова, а затем слова на буквы?Строка, кол-во слов и буквы вводятся...
Нужно ли находить длинну строки и кол-во символов в ней? И как сделать так, чтобы если ты ввел строку из 50 символов, она делилась на 4 слова по 7 букв?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2





Группа: Пользователи
Сообщений: 4
Пол: Мужской
Реальное имя: Владимир

Репутация: -  0  +


вот тут конечно ошибка но хочется узнать я правильно делаю или нет?
Цитата
program Project3;

{$APPTYPE CONSOLE}

uses
SysUtils;

type s=string[80];
procedure insert(s:string;var s2,s1:string;i:integer);
var
m:integer;
begin
Writeln('Enter the String...');
readln(s);
Writeln('Enter the m...');
readln(m);
for m:=1 to length(s) do
s1:=' ';
s:='maxwelld';
insert(s,s1,m);
end;
end.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 16.06.2024 10:40
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name