Question

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

Answer 1

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.