Uses crt;
procedure VVOD(var s:string;var i,error:byte);
begin
repeat
read(s);
val(s,i,error);
if error=1 then
write('введены не числовые коэфиценты, повторите ввод: ');
if ((i>15) and (i<0)) then
write('число не укладывается в заданный интервал');
until ((error=0) and (i<=15) and (i>=0));
If i<=9 then writeln(i);
If i>=10 then
begin
if (i=10) then S:="A";
if (i=11) then S:="B";
if (i=12) then S:="C";
if (i=13) then S:="D";
if (i=14) then S:="E";
if (i=15) then S:="F";
writeln(S);
end;
end;
Var i,s: integer;
<span>begin
</span><span> i:=1; s:=0;
</span><span> repeat
</span><span> s:=s+i;
</span><span> i:=i*2;
</span><span> until i>256;
</span><span> writeln('s = ',s);
</span><span>end.
второй вариант:
var s: integer;
begin
</span> s:=1 shl 9 - 1;
<span> writeln('s = ',s);
</span><span>end.
</span><span>
s = 511
</span>
Ответ:Он разрурится
Чтобы робот переместился из точки А в точку В нужна такая последовательность команд : 32324
Объяснение:
В формуле смешанная ссылка. Проверяем из D2 копируем в Е1
( у нас меняется столбец на одну позицию вперед был D стал Е , а номер строки уменьшается на одну позицию , был 2 стал 1)
Это правило применяем для формулы B$3+$C2
B$3 станет С$3 (абсолютная ссылка при копировании формулы не меняется , как было $3 так и останется $3)
$C2 станет $C1
Формула примет вид C$3+$C1= 5+3=8
Ответ 1