151 в двоичной системе (10010111) тем самым единиц равняется 5.
<span>var x,y,a,b,h:real; i:integer;
begin
readln(a,b,h);
x:=a-h;
for i:=1 to round((b-a)/h)+1 do
begin
x:=x+h;
y:=2*x*x*x-0.5*x+5;
writeln(x:4:1,' ',y:6:3);
end;
end<span>.
Пример:
</span><span>-2 2 0.5
</span><span>-2.0 -10.000
-1.5 -1.000
-1.0 3.500
-0.5 5.000
0.0 5.000
0.5 5.000
1.0 6.500
1.5 11.000
2.0 20.000</span></span>
1) Проверьте подключение к электросети, соответствие напряжения в сети параметрам ПК 2) Включите системный блок 3) Включите монитор <span>4) Выключайте ПК через меню Пуск - Завершение работы, затем отключайте монитор</span>
Var x,y,z:integer Begin; Read (x); Read (y); If x>y then write (x,'-',y,'=',z) Else write (y,'-',x,'=',z) End. Я записываю чи
Ангелина Андреева
If x>y then write (x,'-',y,'=',x-y)
Else write (y,'-',x,'=',y-x)