Program x; var a,b: integer; procedure p(x,y: integer; ); procedure w (c,d: integer); var begin writeln(c+d); end; begin w(x,y); writeln(c-d); end; begin readln(a,b); p(a,b); readln; end. a) запишите имена переменных: б) запишите имена локальных переменных: в)обьясните термины основная программа подпрограмма