Удалить все буквы "а" предшествующие первой запятой, а все буквы "q" после первой запятой заменить на "!"

@anya_85 · Регистрация: 07.09.2014

Author24 — интернет-сервис помощи студентам

Доброй ночи всем!
Очень нужна помощь в решении задачи.
Дана строка. Удалить все буквы "а" предшествующие первой запятой, а все буквы "q" которые идут после первой запятой заменить на "!".
вот то что я нарешала,но она работает некоректно. Никак не могу понять где ошибка

Pascal    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
program zadacha;
uses crt;
var s:string;
     i,n:byte;
begin
writeln('vvedit ryadok simvoliv');
readln(s);
i:=0;
  while s[i]<>',' do
  begin
    if s[i]='a' then
    Delete(s,i,1);
    i:=i+1;
   end;
  for n:=i+1 to length(s) do
   if s[i]='q'then
    begin
    delete(s,i,1);
    insert('!',s,i);
    end;
   writeln(s);
  repeat until Keypressed;
end.

@CodeR · 07.09.2014, 07:12

Pascal    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
program zadacha;
uses crt;
var s:string;
     i,n:byte;
begin
writeln('vvedit ryadok simvoliv');
readln(s);
if Pos(',',s)=0 then
Begin
  writeln('Нету запятой.');
  repeat until Keypressed;
  Exit;
End;
i:=1;
  while s[i]<>',' do
  begin
    if s[i]='a' then
    Begin
      Delete(s,i,1);
      dec(i);
    End;
    i:=i+1;
   end;
  for n:=i+1 to length(s) do
   if s[n]='q'then
    begin
    delete(s,n,1);
    insert('!',s,n);
    end;
   writeln(s);
  repeat until Keypressed;
end.

@anya_85 · 07.09.2014, 09:50 **[ТС]**

Спасибо огромное, все получилось!))

Новые блоги и статьи Все статьи Все блоги /
Как работает Node.js изнутри run.dev 29.03.2025 Node. js изменил подход к разработке веб-приложений, позволив использовать JavaScript не только на стороне клиента, но и на сервере. Созданный в 2009 году Райаном Далем, этот открытый,. . .	Моки в Python: Mock Object Library py-thonny 29.03.2025 Тестирование кода требует особого подхода, когда речь идёт о компонентах, взаимодействующих с внешним миром. Мы часто сталкиваемся с непредсказуемостью HTTP-запросов, чтением данных из базы или. . .	JavaScript: Управление памятью и улучшение производительности run.dev 29.03.2025 В отличие от низкоуровневых языков программирования, JavaScript не требует ручного выделения и освобождения памяти. Здесь работает автоматический сборщик мусора, который определяет, какие объекты. . .	Мультитенантная архитектура со SpringBoot и PostgreSQL ArchitectMsa 29.03.2025 SaaS-приложения редко обслуживают одного клиента и обычно они должны поддерживать множество организаций, каждая из которых работает в своём изолированном пространстве. Мультитенантная архитектура. . .	std::span в C++: Производительность и лучшие практики NullReferenced 28.03.2025 std::span — одно из самых недооценённых нововведений стандарта C++20, которое радикально меняет подход к работе с непрерывными последовательностями данных. По сути, это невладеющее представление. . .
Многопоточность в C#: Threadpool UnmanagedCoder 28.03.2025 Пул потоков в C# — это коллекция заранее созданных и готовых к использованию потоков, которые находятся в распоряжении приложения. Вместо того чтобы создавать и уничтожать потоки для каждой небольшой. . .	Вопросы на собеседованиях по микросервисам ArchitectMsa 27.03.2025 Работодатели ищут не просто разработчиков, знающих базовые концепции, а специалистов, разбирающихся в тонкостях масштабирования, отказоустойчивости и производительности. Сейчас на первый план выходят. . .	Взаимодействие Python с REST API py-thonny 27.03.2025 REST API - это архитектурный стиль взаимодействия компонентов распределённого приложения в сети. Python располагает функциональным набором инструментов для работы с REST API и основная библиотека для. . .	sshd restrictions, ssh access limitations jigi33 26.03.2025 sshd restrictions \| ssh access limitations рестрикции доступа на сервер sshd статья: https:/ / www. golinuxcloud. com/ restrict-allow-ssh-certain-users-groups-rhel	Компиляция C++ с Clang API NullReferenced 24.03.2025 Компиляторы обычно воспринимаются как черные ящики, которые превращают исходный код в исполняемые файлы. Мы запускаем компилятор командой в терминале, и вуаля — получаем бинарник. Но что если нужно. . .

@anya_85 0 / 0 / 0 Регистрация: 07.09.2014 Сообщений: 2
	07.09.2014, 09:50 [ТС]
	Спасибо огромное, все получилось!)) 0