Написать программу вычисления стоимости покупки с учетом скидки. скидка в 10% предоставляется, если сумма покупки больше 1000 руб

Var a ,b : real; begin writeln ( 'enter price: ' ); readln (a ); b : = 10; b : =a /b; if (a> 1000 ) then begin writeln ( 'discount 10%' ); a : =a -b; write ( 'price with discount: ' ,a : 2 : 2 ); readln; end else begin write ( 'price: ' ,a : 2 : 2 ); readln; end; end.

Информационное общество — общество, в котором большинство работающих занято производством, хранением, переработкой и реализацией информации, особенно высшей ее формы — знаний. для этой стадии развития общества и характерно: увеличение роли информации, знаний и информационных технологий в жизни общества возрастание числа людей, занятых информационными технологиями, коммуникациями и производством информационных продуктов и услуг, рост их доли в валовом внутреннем продукте нарастающая информатизация общества с использованием телефонии, радио, телевидения, сети интернет, а также традиционных и электронных сми создание информационного пространства, обеспечивающего: (а) эффективное информационное взаимодействие людей (б) их доступ к мировым информационным ресурсам (в) удовлетворение их потребностей в информационных продуктах и услугах развитие электронной демократии, информационной , электронного государства, электронного правительства, цифровых рынков, электронных социальных и хозяйствующих сетей.

32 символа кодируются 5-битным двоичным кодом

количество символов всего: 7 х 40 х 50 = 14000

общее количество бит информации 7

в байтах: 8750

теперь оговорки:

1. кодировать текст пятибитными символами не принято, обычно используются 8-битные или 16-битные, в таком случае ответ будет соотвественно 14000 и 28000

2. если используется алгоритм сжатия без потерь, то количество байт может быть меньше, чем 8750.

3. если используется избыточность для восстановления испорченных битов, тогда потребуется больше байт..