Сравнительная таблица Органы власти в XVI-XVII вв. в Англии и во Франции и их функции

Begin
var: x,y: integer;
Begin
Writeln('Vvedite x');
If x>5 then y=x+4 else y=x-10;
Writeln('y=',y);
Readln;
Readln;
End.