CLS
INPUT "a,b = ", a, b
IF a > b THEN
PRINT a
ELSE
PRINT b
END IF
---------------------
CLS
INPUT "a,b = ", a, b
c = SQR(a * a + b * b)
p = a + b + c
PRINT "P = "; p
А сколько строк?
а то не решить
Он помогает бухгалтерам и вообще разным профессиям
If x>y then begin writeln ('Не попал! Число больше!');goto m; end;
<span>if x<y then begin writeln('Не попал! Число меньше');goto m; end;</span>