Решите уровнение - 13 умножить 3,2x + 0,4 = 40 решите пример по действиям - (6,385+28) умножить (8,9-0,46

var A,B, minA, maxA, minB, maxB, minn, maxx, t, t1, i:longint;

begin  

readln(A); readln(B);

minA:=(A-1)*50+1; maxA:=A*50;

minB:=(B-1)*70+1; maxB:=B*70;

if (minA>maxB) or (minB>maxA) then writeln(-1) else

begin

if minA<minB then minn:=minB else minn:=minA;

if maxA>maxB then maxx:=maxB else maxx:=maxA;

t:=minn div 60;

t1:=maxx div 60;

if (minn mod 60)<>0 then inc(t);

if (maxx mod 60)<>0 then inc(t1);

for i:=t to t1 do  

write(i, ' ');

writeln();

end;

end.

не могу сказать верно или нет, так как не проверял а просто написал в блокнотике

поклажа О ?узлов, но сравняется с М, если 1 возьмет у М;↓
поклажа М ? узлов, но будет в два раза >О, если возьмет 1 узел у О.↑
Решение.


О + 1 = М - 1 запись первого условия;
М = О + 2 следует из первого условия;
2*(О - 1) = М + 1  запись второго условия;
2О - 2 = (О +2) + 1; подстановка выражения для О во второе условие;
2О - О = 2 + 2 + 1 перегруппировка выражения;
О = 5 (узлов) поклажа осла;
М = 5 + 2 = 7 (узлов) поклажа мула.
ответ: 5 узлов тащил осел, 7 узлов тащил мул.
Проверка: 5+1 = 7-1;  6=6;  Решение отвечает первому условию.  7+1 = 2(5 -1);  8 = 8  Отвечает второму условию.


1). 1 + 1 = 2 (узла)  разница в узлах между М и О, так как для равенства у М нужно 1 отнять, а О 1 добавить;
2). 2 + 1 +1 = 4 (узла) будет разница если мул возьмет у О еще один узел, а у того станет на 1 узел меньше;
3). 4 * 2 = 8 (узлов)  будет поклажа М с одним "лишним" узлом, взятым у О, так как при этом по условию М будет тащить в два раза больше О. Т.е. разница в 4 узла будет составлять половину его поклажи. 
4). 8 - 1 = 7 (узлов)   первоначальная поклажа М;
5). 7 - 2 = 5 (узлов)  первоначальная поклажа О.
ответ: Мул тащит 7 узлов, Осел тащит 5 узлов.
Проверка: 5+1 = 7-1;  6=6;   7+1 = 2(5-1);   8 = 8.