Для 4 произвольных чисел, введенные с клавиатуры, выведите на экран соответствующие результаты.если разностьпервых двух

program zz1;var a, b, c, d:integer;  beginwrite(\' введите первое число \'); // вводим первое числоread(a); write(\' введите второе число \'); // вводим второе числоread(b);write(\' введите третье число \'); // вводим третье числоread(c);write(\' введите четвертое число \'); // вводим четвертое числоread(d);if a - b > d then writeln(a, \' \', b, \' \', c, \' \', d);if (a + b + c + d) <= 80 then writeln(a, \' \', b);if (a - b > d) and ((a + b + c + d) <= 80) then writeln(c, \' \', d)else writeln(a + 5, \' \', b + 5, \' \', c + 5, \' \', d + 5);end.