Напишите наибольше целое число х для которого истинно высказывание (x<70) или не (x<80)

Объяснение:

Преобразуем: (х < 70) или (х > 80); Если наибольшее найти, то там все улетает в бесконечность. Или задание рассчитано на это, или вы сделали ошибку когда писали тут

(12-3): (4+5)=1

1х2х3-4+5-6=1

(12: 3+4+5): (6+7)=1

(1+2-3+4+5+6-7): 8=1

var x1,x2,x3,x4: integer;

function max(a,b: integer): integer

begin

    if a> b then max: = a

    else max: =b;

end;

begin

  read(x1,x2,x3,x4);

  x1: =max(x1,x2);

  x2: =max(x3,x4);

  x1: =max(x1,x2);

  writeln(x1);

end.