напишите программу вычисления в паскаль ,пожалуууйстаа!

Ответы:

var

a,b,c,d: real,

begin   

write(a=),   

readln(a),   

write(b=),   

readln(b),   

write(c=),   

readln(c),   

write(d=),   

readln(d),   

 write((a+b)/(a-b)+c/d=,(a+b)/(a-b)+c/d),   

end.