Надо составить программу в паскале, в которой надо найти процент от заданного числа

Var      q: single; // результат. если число будет больше, то указать  double i: single; // число из которого необходимо получить результат.  если число будет больше, то указать  double p: single; // процент. если процент будет всегда целым числом, то указать  byte begin  writeln('введите число => ');   read(i);   writeln('введите процент, который хотите расcчитать из введенного числа => ');     read(p);   while p < 0 do begin       writeln('процент не может быть меньше нуля, введите новое значение => ');     read(p);     end;   q: =(i / 100) * p;   writeln('ваш результат из числа => ', i, ', ', p, '% = ', q); end.

Информация всегда являлась немаловажным фактором общественного развития. С ее человечество концентрировало многовековой опыт жизни прежних поколений. Поговорка «Кто владеет информацией - тот владеет миром» подчёркивает социальную роль информации. Владение информацией открывает новые модели управления, формирует новые социальные структуры общества.

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

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

По данным ЮНЕСКО, более половины всего занятого населения наиболее развитых стран прямо или косвенно принимает участие в процессе производства, хранения и распространения информации.

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

Информационное общество — общество, в котором большинство работающих занято производством, хранением, переработкой и реализацией информации, особенно высшей ее формы — знаний.

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

Глубина цвета определяется количеством бит на пиксель, которое может отображаться на экране. Данные хранятся в битах. Каждый бит представляет два цвета, потому что он имеет значение 0 или 1. Чем больше бит на пиксель, тем больше цветов может отображаться.