Используя функцию INSERT и POS , в данной строке,содержащей два слова, разделённых запятой, добавить пробел после запятой.

var
  i: integer; 
  s: string;
begin
  write(Введите два слова через запятую : );
  read(s);
  for i := 1 to length(s) do
    if s[i] = , then insert( , s, pos(,, s) + 1);
  writeln(s);
end.

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