3. На скільки кроків переміститься об'єкт після виконання даної
програми? *
Коли натиснуто
надати S значення 5
перемістити на Ѕ кроків
перемістити на s кроків
1) 0
2) 15
3) 10
4) 5
іть будь ласка!!​

var s : string; symb : char; i : longint; begin  readln(s);   readln(symb);   if pos(symb,s)=0 then writeln('в этом слове нет этого символа')  else begin                i: =0;                 while pos(symb,s)< > 0 do begin                                                                    write(pos(symb,s)+i,' ');                                                                     i: =i+1;                                                                     delete(s,pos(symb,s),1);                                                                 end;             end;   writeln;   writeln(i); end.

#include < stdio.h> # define in "input.txt"# define out "output.txt"unsigned long long sum(int n){unsigned long long otv=0; for (int i=1; i*i< =n; i++)if %i)){otv+=i; if(i*i! =n)otv+=n/i; }return otv; }int main(void){unsigned long long n,otv=0; freopen(in,"r",stdin); freopen(out,"w",stdout); scanf("%i64d",& n); otv=sum(n); printf("%i64d",otv); return 0; }

|з       з|

|         з|

|з   з     |

обработка с электронных таблиц автоматизирует весь процесс и ускоряет выполнение работы.