Составить программу. Язык Pascal 1. х+4/х-2 2. корень из x^2-4x-4/x-8

Составим программы на языке программирования Паскаль, для вычисления значения заданного выражения:

1) programm zhnachenie1;

var f, x: integer;

writeln ('Введите значение переменной x: ');

readln (x);

f = (x + 4) / (x - 2);

writeln ('Полученное значение выражения f (x) = ' f);

readln (f);

end.

2) programm zhnachenie2;

var f, x: integer;

writeln ('Введите значение переменной x: ');

readln (x);

f = (sqr (x) - 4 * x - 4) / (x - 8);

writeln ('Полученное значение выражения f (x) = ' f);

readln (f);

end.