Program primer;
Var
i:integer;
begin
i:=-4;
repeat
writeln(i,' ',3*i);
i:=i+2;
until i>4;
end.
3)
направо 90
вперед 100
налево 90
вперед 100
повторить 2{
направо 90
<span>вперед 100}
</span><span>
4)
</span>направо 90
вперед 100
налево 90
вперед 100
повторить 2{
направо 90
<span>вперед 100}
</span>повторить 4{
повторить 2{
налево 90
<span>вперед 100}
</span>повторить 2{
направо 90
<span>вперед 100}
</span>}
4) DVD+RW
На CD-RW в принципе тоже можно, но перед этим надо полностью стереть все что там хранится и записать это заново. А первые два варианта - диски однократной записи.
A10=3*10^2+6*10^1+1*10^0+1*10^( -1 ) +0*10^( -2 )+5*10^( -3 )