Составить программу, которая проверяла бы, не приводит ли суммирование двух целых чисел А и В к переполнению (т. е. к результату
Вопрос посетителя
Составить программу, которая проверяла бы, не приводит ли суммирование двух целых чисел А и В к переполнению (т. е. к результату большему, чем 32 767). Если будет переполнение, то сообщить об этом, иначе вывести сумму этих чисел.
Ответ эксперта
var a,b: integer;
begin
write(‘A = ‘); readln(a);
write(‘B = ‘); readln(b);
if MaxInt — a < b then
writeln(‘Perepolnenie!’)
else
writeln(‘A + B = ‘,a+b);
readln; end.