//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var i:=0;
range(0,10).Select(x->3**x).ForEach(t->begin writeln(i,' ',t); inc(i); end);
end.
1)
a=3+8*4=35;
b=(35 div 10)+14=3+14=17
a=(17 mod 10)+2=7+2=9
2)
a=100-30*3=10
т.к. а<b (10<30) то идём по отрицательной ветви (else)
c=30-10=20
Ответ: 1) а=9; 2) с=20
Var n:integer;
x:real;
begin
n:=0;
x:=300000;
while x<550500 do
begin
x:=x+0.11*x;
n:=n+1;
end;
writeln(n);
readln;
end.
Кадр анимации представляет Картинку изображения которая сменяется другим кадром ещё это очень маленькая часть в анимации
Вариант №4, там всего 2 еденицы
Примечание(объяснение) 15,25,29,33 дели на 2, каждый раз, и, ты выведешь двоичную запись из десятичной.!