Строки. Заменить все символы «+» и «-» на «*» и подсчитать количество замен

@Spray1 · Регистрация: 07.12.2011

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

1.В строке заменить все символы «+» и «-» на «*» и подсчитать количество замененных символив.В строке заменить все символы «+» и «-» на «*» и подсчитать количество замененных символов.

2.Отредактировать предложения, заменяя сочетание символов «...» одной точкой.

@КонецСвета · 12.12.2011, 18:36

Pascal

uses crt;
var s: string;
    i,k: integer;
begin
write('s=');
readln(s);
for i:=1 to length(s) do
    if (s[i]='+') or (s[i]='-') then
       begin
       s[i]:='*';
       inc(k);
       end;
writeln('Произведено ',k,' замен:');
write('s=',s);
readkey
end.

@morgan57 · 12.12.2011, 18:43

вторая:

Pascal

var
i,j,x:integer;
n:string;
begin
  readln(n);
  for i:=1 to length(n) do begin
    if n[i]='.' then begin
      if (n[i+1]='.') and (n[i+2]='.') then delete(n,i,2);
    end;
  end;
  writeln(n);
end.

@Spray1 0 / 0 / 0 Регистрация: 07.12.2011 Сообщений: 34
		1
	Строки. Заменить все символы «+» и «-» на «» и подсчитать количество замен 12.12.2011, 17:14. Показов* 4582. Ответов 2 Метки нет (Все метки) 1.В строке заменить все символы «+» и «-» на «» и подсчитать количество замененных символив.В строке заменить все символы «+» и «-» на «» и подсчитать количество замененных символов. 2.Отредактировать предложения, заменяя сочетание символов «...» одной точкой. 0

	12.12.2011, 18:43

Строки. Заменить все символы «+» и «-» на «*» и подсчитать количество замен

Решение