а) var x, y: double;
б) var n: integer; a, b, s: double;
Под буквой б: n - кол-во тетрадей и обложек; a, b - цена тетради и обложек; s - общая цена покупки.
