помогите плёс, как это написать в паскале???? срочно прошу!!!!

Ответ:

B1- на Паскале

var x:integer;

y:real;

begin

write('x='); readln(x);

y:=5/(2*x+7);

writeln('y=',y);

end.

C1-

var n:integer;

begin

read(n);

if n mod 11=0 then write('Делится') else

 write('Не делится');

end.

Объяснение: