Составить программу, которая каждую букву "а", встречающееся в тексте, заменяет на группу символов "ку"

@k3na4 · Регистрация: 23.12.2010

Составить программу, которая каждую букву "а", встречающееся в тексте, заменяет на группу символов "ку"(например"ады" - "куда").

Комментарий модератора

Именуйте темы осмысленно. Название темы должно отражать ее содержимое.

@marshal · 23.12.2010, 18:03

Pascal

program ariiskii_vlastelin;
uses crt;
var a:string; i:integer;
begin
clrscr;
writeln('строку');
readln(a);
For i:=1 to length(a) do
begin
If copy(a,i,1) ='а' then
begin
delete(a,i,1);
insert('ку',a,i);
end;
end;
writeln(a);
readln;end.

вот так?

@k3na4 · 23.12.2010, 18:15 **[ТС]**

СПС тебє очень !!!!!!!=))может поможеш ищо з какимито????

@k3na4 0 / 0 / 0 Регистрация: 23.12.2010 Сообщений: 26
	23.12.2010, 18:15 [ТС]	3
	СПС тебє очень !!!!!!!=))может поможеш ищо з какимито???? 0

Опции темы

Составить программу, которая каждую букву "а", встречающееся в тексте, заменяет на группу символов "ку"

Решение