Program p1;vara:string;i:integer;beginreadln(a);for i:=length(a) downto 2 dobeginif a[i]=a[i-1]then delete(a,i,1);end;writeln(a);end............................................................................
Ввел: asdfsss
Результат: asdfs
Либо я не знаю либо нужно подумать. Но символу нельзя присвоить число ему можно присвоить только символ.
В какой оболочке земли живёт большинство живых организмов?
Из каких неживых частей состоит экосистема
На какие расы делятся население земли
Определение статуса военнослужащего (краткий ответ!!)
Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.