var s1,s2,c1,c2:string;
i:integer;
Begin
read(s1,c1,c2);
for i:= 1 to length(s1) do begin
s2:=s2 + s1[i];
if s1[i]=c1 then s2:=s2+c2;
end;
writeln(s2);
End.
Ответ 3, так как он поднялся 1 раз, спустился 2, по условию подходит
#include <iostream>
using namespace std;
int main()
{<span>
int a,s;</span><span>
a=1;</span><span> s=0;</span><span>
while (a!=0)
{</span><span>
cin>>a;</span><span>
s=s+a;</span><span>
}</span><span>
cout<<s;
</span>return 0;
}<span>
</span>