Это можно рассмотреть как: "Для i от 10 до -10 выполнить(делать) S=S+1;
Следовательно посчитав " на пальцах"(так проще), находим, что тело цикла выполнится 21раз(0 тоже число)
Один бит информации уменьшает неопределенность в два раза.
Program abc;
var a,b,c,i,i1:integer;
begin
readln(a,b);
if(a<b) then
for i:=1 to b do
begin
i1:=i+1;
c:=i1+i;
end;
if(a>b) then
for i:=1 to a do
begin
i1:=i+1;
c:=i1+i;
end;
writeln(c);
end.
<span>var a,b,c,min,max:integer;
begin
readln(a,b,c);
if a<b then min:=a else min:=b;
if c<min then min:=c;
writeln(min);
if a>b then max:=a else max:=b;
if c>max then max:=c;
writeln(max);
end<span>.
Пример:
</span><span>1 2 3
1
3</span></span>
Ответ В
Нужно добавить "треко" на 3 место в слог " ант"
в итоге одна буква "т" уберется и получится "антреко"