Напишите программу, которая проверяет, не приведет ли суммирование двух заданных целых чисел (Определенного типа) к переполнению.

Question

Информатика

Агриппина

10 марта, 23:08

Напишите программу, которая проверяет, не приведет ли суммирование двух заданных целых чисел (Определенного типа) к переполнению.

+4

Ответы (1)

Знаете ответ на вопрос?

Ивон · Answer 1

Const

low=-32768;

high=32767;

Var i, j : integer;

begin

readln (i, j) ;

if sign (i) * sign (j) <0 then writeln ('Сложение допустимо, результат ', i+j)

else

if i<0 then

if j
else writeln ('Сложение допустимо, результат ', i+j)

else

if j>high-i then writeln ('Сложение недопустимо: возникнет переполнение')

else writeln ('Сложение допустимо, результат ', i+j)

end.