[Pascal]Обработка строк

Аватара пользователя
Колядин Максим
Сообщения: 297
Зарегистрирован: 16 ноя 2006, 19:09
Откуда: Seattle, WA
Контактная информация:

BBB писал(а):То есть, по твоему, в программах (за все время их работы) значение переменным присваиивается ЛИШЬ ОДНАЖДЫ????
В данном случае - да. В программе нужно только один раз ввести значение S вручную. В других же ситтуациях, безусловно, я не прав.
BBB писал(а):В реальной программе второе (и дажее - третье, четвертое) присвоения могут быть выполнены, конечно же, через какое-то время, "через" несколько операторов и т.п.
Спасибо. Вот с этим я уж точно не встречался за все годы работы с программированием -)]

Код: Выделить всё

var s,s1:string
begin
 s:='123b';
 s1='bba';
 for i:= length(s) downto 1 do if s[i]=s[i+1] then delete(s,i,1); 
end;[/quote]
Я что-то не пойму что ты имелл ввиду. Зачем обрабатывать строку S, если в ней нет одинаковых рядомстоящих букв.
Программист - это человек, который решает способом, который вы не понимаете, проблемы, о которых вы даже не подозревали...
Аватара пользователя
somewhere
Сообщения: 1858
Зарегистрирован: 31 авг 2006, 17:14
Откуда: 71 RUS
Контактная информация:

&quot писал(а):Я что-то не пойму что ты имелл ввиду. Зачем обрабатывать строку S, если в ней нет одинаковых рядомстоящих букв.
Значит ты так и не понял своей ошибки.

Код: Выделить всё

var s:String[5];
      i:Char;
      p:Integer;
begin
S:='ABCDE';
I:='F';
p:=6;
Writeln(S[P]);
end.
Сможешь сказать, что этот код нарисует, не запуская его?
It's a long way to the top if you wanna rock'n'roll
Аватара пользователя
Колядин Максим
Сообщения: 297
Зарегистрирован: 16 ноя 2006, 19:09
Откуда: Seattle, WA
Контактная информация:

По-моему, код ничего рисовать не будет - здесь графика не используется -);
Ну, высветит Pascal содержимое переменной i(f), но это тут причём?
Программист - это человек, который решает способом, который вы не понимаете, проблемы, о которых вы даже не подозревали...
Аватара пользователя
Колядин Максим
Сообщения: 297
Зарегистрирован: 16 ноя 2006, 19:09
Откуда: Seattle, WA
Контактная информация:

Включай ICQ или Spyke - переговорим...
Программист - это человек, который решает способом, который вы не понимаете, проблемы, о которых вы даже не подозревали...
Ответить