Написать программу вычисления стоимости покупки, состоящей из нескольких…

Program z_1; var n,k,s,m: integer; begin write ('введите количество тетрадей'); read (n); write ("введите стоимость тетрадей"); read (m); write ('введите стоимость обложки); read (k); s: =n*m+n*k; write ('стоимость покупки=', s); end.