Program prim9; var x, y: integer, c: boolean; begin read (x, y) c : = x> 5 or x+y< 10; writeln (c); end; сколько тут ошибок?

Var
x, y, z: Integer, c: Boolean;
Begin
Read (x, y);
z:= x+y;
if (x>5) or (z<10) then
с:= true;
else
c:= false;

Это то что ты хотел?