В группах символов, состоящих только из цифр, поменять первый и последний элемент местами - Pascal ABC

  1. Помогите,пожалуйста


textual

Код:

uses crt;
const cf=['0'..'9'];
var s:string;
    i,j,k1,k2,n:byte;
    c:char;
begin
writeln('Введите строку, содержащую группы цифр');
read(s);
n:=length(s);
i:=1;
while i<=n do
if (s[i] in cf)and((i=1)or not(s[i-1] in cf)) then
 begin
  k1:=i;
  k2:=i;
  while s[k2] in cf do inc(k2);
  c:=s[k1];
  s[k1]:=s[k2-1];
  s[k2-1]:=c;
  i:=k2;
 end
else inc(i);
write(s)
end.


Похожие ответы
  1. Помогите решить задачу. Дана строка s, содержащая менее чем 256 символов и представляющая собой набор слов, разделенных одним или несколькими пробелами. Найти любое слово в исходной последовательности символов, начинающееся с комбинации букв но. Использовать стандартные процедуры и функции в действиях над строками. Принцип действия не понял, помогите хотя бы начать.

  1. Дана строка. Написать программу поиска и вывода всех пар одинаковых соседских символов, если такие пары ссуществуют.

  1. Дана строка символов . Выяснить, имеется ли в строке такая пара символов, что - это запятая, а - тире. Очень нужна помочь вашая , а то ни как не могу сделать

  1. 17. Найти количество цифр в строке символов, используя функции.

  1. Дана строка символов, среди которых есть двоеточие ( : ). Определить, сколько символов ему предшествует

  1. Посчитать сколько содержится в файле символов, строк и слов. Разделителями слов считать пробелы и перенос строки

  1. Я сам в строках вообще 0 помогите пожалуйста следующие задание: 1)даны последовательность символов, в начале которой имеется некоторое количество одинаковых символов.Определить это количество.рассмотреть два случая: а)известно,что не все символы последовательности одинаковые б)все символы последовательности могут быть одинаковыми 2)Дано предложение.Заменить в нем все буквосочетания да на нет. 3)Дан текст.Определить является ли он правильной десятичной записью целого числа. 4)Дана два слова.для каждой буквы первого слова определить входит ли она во второе слово.Повторяющиеся буквы первого слова не рассматривать.Например,если заданые слова процессор и информация , то для первого из нех ответом должно быть: нет да да да нет нет. ПОМОГИТЕ МНЕ ПОЖАЛУЙСЯ!!!

  1. Дана строка символов, посчитать сколько раз встречается символ "+" и символ "*". Помогите пожалуйста.

  1. ребят помогите решить задачку дана строка символов,среди которых есть двоеточие.определить, сколько символов ему предшествует блок схемы уже научилась делать )