var
kt, st, kr, sr, kk, sk, sum :integer;
{kt - количество тетрадей,
st - стоимость тетради
...
sum - сумма покупки}
