В 1 гб. - 1000 мб.
В 1 мб.- 1000 кб.
В 1 б. - 1 бт.
Исходя из самого вопроса - тут не важно само выражение функции.
1. 7 { -6, -4, -2, 0, 2, 4, 6 }
Var k,n : Real;
Begin
n:=0;
k:=-6;
While k<=6 do
Begin
k:=k+2;
n:=n+1;
end;
Writeln('n = ',n);
end.
2. 7 { -2, -1.5, -1, -0.5, 0, 0.5, 1 }
Var k,n : Real;
Begin
n:=0;
k:=-2;
While k<=1 do
Begin
k:=k+0.5;
n:=n+1;
end;
Writeln('n = ',n);
end.
3. 3 { -3, -1, 1 }
Var k,n : Real;
Begin
n:=0;
k:=-3;
While k<=2 do
Begin
k:=k+2;
n:=n+1;
end;
Writeln('n = ',n);
end.
4. 7 { -1, -0.5, 0, 0.5, 1, 1.5, 2 }
Var k,n : Real;
Begin
n:=0;
k:=-1;
While k<=2 do
Begin
k:=k+0.5;
n:=n+1;
end;
Writeln('n = ',n);
end.
Ответ /b- 2.3.4.1
2-прйамоугольник
3-квадрат
4-треугольник
1-круг
3 * a - b = 3 * 8 - 3 = 24 - 3 = 21 ⇒ a
( a / 3 ) * ( b + 2 ) = <span>( 21 / 3 ) * ( 3 + 2 ) = 7 * 5 = 35 ⇒ b
Ответ: 35
</span>
8064 Кбайт
........................