var a:integer;
begin
readln (a);
if (a>0) then
repeat
a:=a-3;
until(a<0);
if (b<0) then
repeat
a:=a+2;
until (a>70);
writeln (a);
end.
<span>2/ точек по вертикали и горизонтали</span>
()()()()()()()()()()()()()()()()
<span>Новое число в последовательности получается путем сложения двух последних чисел:
0,1,1,2,3,5,8,13,21,34
Ответ: C)34</span>
9*13= 117 - сколько всего сантиметров
512 * 8 = 4096 сколько бит весит 1 сантиметр
117 * 4096 / 8*1024 = 58,5 кбайт