Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и такого же количества обложек к ним. напаскале
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.