Pascal
var
x, y : integer;
begin
writeln('Введите x');
readln(x);
if x>7 then
y:=x+7
else
if x=7 then
y:=x
y:= sqr(x)-5;
writeln('y=', y)
end.
