Коефіцієнт використання робочого часу для двох комбайнів складає 0,7 і 0,5 відповідно. Зупинки в роботі носять випадковий характер і не залежать одна від одної. Яка ймовірність простою обох комбайнів?

А) 690:3*205-47150+850 = 850
Б) (238 145-237 776):41+327:3*7 = 772
В) 10000-120*80+(900-750:25)*7 = 6460

А) 690:3*205-47150+850=850
1) 690 : 3 = 230
2) 230 * 205 = 47150
3) 47150 - 47150 = 0
4) 0 + 850 = 850
ответ: 850

Б) (238 145-237 776):41+327:3*7 = 772
1) 238 145 - 237 776 = 369
2) 369 : 41 = 9
3) 327 : 3 = 109
4) 109 * 7 = 763
5) 763 + 9 = 772
ответ: 772

В) 10000-120*80+(900-750:25)*7 = 6460
1) 750 : 25 = 30
2) 900 - 30 = 870
3) 870 * 7 = 6090
4) 120 * 80 = 9600
5) 10000 - 9600 = 400
6) 6090 + 400= 6460
ответ: 6460

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.

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