Program zadacha;
Var t, v1, t1, v2, t2, v: real;
begin ;
Writeln ('введите значения v1, t1, v2, t2');
Readln (v1, t1, v2, t2);
t := (v1*t1+v2*t2)/(v1+v2);
Writeln ('T смеси = ', t);
<span>end.</span>
Число -41(10)=11010111(2)
загадать число прибавить 20 +10- задуманое число получиться то что у вас плучится решать алгоритм нужно ивам
Просто,скачай другую программу.Или же зайди,в настройки и нажми на яркость.