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

Question

Информатика

Всева

26 сентября, 08:14

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

+1

Ответы (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.