Регистрация
Никита27031
18.01.2020 11:41
Информатика
Есть ответ 👍

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

201
326
Посмотреть ответы 2

Ответы на вопрос:

pipidon17
pipidon17
4,8(7 оценок)

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.   

0070070070007
0070070070007
4,7(60 оценок)

Код ниже

Объяснение:

цел счетчик

алг

нач

вывод "Таблица умножения на 3", нс

нц для счетчик от 1 до 10

вывод "3 * ",счетчик," = ", 3*счетчик, нс

кц

вывод нс

вывод "Таблица умножения на 5",нс

нц для счетчик от 1 до 10

вывод "5 * ",счетчик," = ", 5*счетчик, нс

кц

кон

Популярно: Информатика