Напишите программу, которая проверяет, не приведет ли суммирование двух заданных целых чисел(Определенного типа) к переполнению.
Напишите программу, которая проверяет, не приведет ли суммирование двух заданных целых чисел(Определенного типа) к переполнению.
Гость
Ответ(ы) на вопрос:
Гость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 jhigh-i then writeln('Сложение недопустимо: возникнет переполнение')
else writeln('Сложение допустимо, результат ',i+j)
end.
Не нашли ответ?
Похожие вопросы