Составить программу в Паскале.
Заменить в тексте слово "sin" на слово "cos" и подсчитать количество замен.
Заменить в тексте слово "sin" на слово "cos" и подсчитать количество замен.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
i,k: integer;
begin
k=0;
read (x);
for i:=1 to length(x) do
begin
y:=copy(x, i,3);
If (y='sin') then begin
delete (x, i, 3);
insert ('cos', x, i);
k:=k+1;
end;
writeln (x);
writeln (k);
end.