CLS
INPUT "p1,v1,p0,v2,t1"; p1, v1, p0, v2, t1
t2 = (p1 + p0) * t1 / p1
t3 = v2 * t1 / v1
IF t2 > t3 THEN PRINT "izoxor", t2
IF t3 < t2 THEN PRINT "izobar", t3 ELSE PRINT "izoxor"
CLS
INPUT "p1,v1,p0,v2,t1"; p1, v1, p0, v2, t1
t2 = (p1 + p0) * t1 / p1
t3 = v2 * t1 / v1
IF t2 > t3 THEN PRINT "izoxor", t2
IF t3 < t2 THEN PRINT "izobar", t3 ELSE PRINT "izoxor"