Составить программу в которой переменной А присваивается значение, равное 15, если -7<=Х<=7. В противном случае, переменной А присваивается значение, равное 5. (Х-произвольное число).

program project1;varx,A: integer;beginwrite('x:');readln(x);if (x>=-7) and (x<=7) thenA:=15else  A:=5;writeln(A);readln;end.