CLS
PRINT TAB(18); “Óñòàíîâëåíèå âîçìîæíîñòè ïåðåïîëíåíèÿ”
PRINT TAB(20); “ïðè ñóììèðîâàíèè äâóõ ÷èñåë”
PRINT
INPUT “Ââåäèòå ïåðâîå ñëàãàåìîå”, A
INPUT “Ââåäèòå âòîðîå ñëàãàåìîå”, B
PRINT
DIM A AS INTEGER
DIM B AS INTEGER
IF 32767-A<B THEN 
       PRINT TAB(15); “Ñóììà ÷èñåë ”; A; “è ”; B; “ïðèâîäèò ê ïåðåïîëíåíèþ”;
   ELSE PRINT TAB(10); “Íå ïðèâîäèò ê ïåðåïîëíåíèþ”;
             PRINT “Ñóììà ÷èñåë ”; A; “è ”; B;
             PRINT “ðàâíà ”; A+B;
END IF
END