40 баллов.Помогите пожалуйста составить программу,которая удаляет все символы "и" в произвольном тексте,введённом с клавиатуры.

Ответы

Ответ дал: XIZOR
0
В Паскале?..................

Ответ дал: vikus444
0
да
Ответ дал: XIZOR
0
var a,b,d:string;
i,c,j:integer;
begin
b:='и';
d:='И';
readln(a);
for i:=1 to length(a) do
begin
j:=pos(d,a);
c:=pos(b,a);
delete(a,c,1);
delete(a,j,1);
end;
writeln(a);
end.
Ответ дал: XIZOR
0
Это на Паскале. Что не понятно, так пиши.
Вас заинтересует