Question

Написать программу вычесления стоимости покупк,состоящей из нескольких тетрадей и токого же кол-во обложек к ним.Ниже представлен рекамендующий вид экрана во время работы программы вычесления стоимости покупки введите исходные даные:цена тетради (руб)-2.75цена карандаша(рую)-0.5кол-во комплектов(шт)-7стоимость покупки-22.75 руб!

Answer 1

Program Pokupka;

Uses crt;

var n:longint; {кол-во комплектов}

      b,c,i: integer; {цена 1 тетради и  1обложки соответственно} 

 

      price:real; {общая стоимость покупок}  

 

 

 

begin

     clrscr;

     write('Введите цену 1 тетради:');

     readln(b);  

    write('Введите цену 1 обложки :');

    readln(c);  

    write('Введите количество  комплектов :');

    readln(n); 

    price:=(b*n)+(c*n);

    writeln('Общая стоимость покупок: ',price:4:4); 

 

    readkey;                

end.   

Answer 2

Program pr;
uses crt;
Var a,b,s:real;

       с:integer;
Begin
Write('цена тетради(руб)-');
read(a);
Write('цена обложки(руб)-');
read(b);
Write('кол-во комплектов(шт)-');
read(c);
s:=(a+b)*c;
Writeln('стоимость покупки-',s,' руб');
readln;
end.

Answer 3

Конечно, я помогу с этой программой! Но, кажется, текст немного запутан. Давайте я правильно пойму, что нужно сделать:

1. Нужно написать программу, которая вычислит стоимость покупки, состоящей из нескольких тетрадей и такого же количества обложек к ним. 2. Есть некоторые исходные данные: цена тетради (2.75 рубля), цена карандаша (0.5 рубля), количество комплектов (7 штук) и общая стоимость покупки (22.75 рубля).

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