Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Предоплата всего
Подписываем
Лабораторная работа №3
Построение диаграмм
Пример. Построить столбчатую диаграмму (гистограмму), отображающую динамику среднесуточных температур воздуха в течение недели. Для ввода значений температуры, можно воспользоваться датчиком случайных чисел Random.
program Graf_1;
uses GraphABC;
const dx=50; {ширина столбика}
z=20; {расстояние между столбиками}
k=7; {число дней в неделе}
delta = 10; {диапазон изменения температур от -10о до 10о}
var x, y, color, i, t, xm, ym: integer;
begin
TextOut(250,0,'ТЕМПЕРАТУРА ВОЗДУХА ЗА НЕДЕЛЮ');
xm:=WindowWidth;
ym:=WindowHeight;
y:=ym div 2;
x:=dx+z;
Line(x-z,y,xm-z,y); {ось OX}
Line(x-z,z,x-z,ym-z); {ось OY}
TextOut(x-2*z,y,'0');
for i:=1 to k do begin
t:= Random(2*delta)-delta;
if t>0 then color:=clRed
else color:=clBlue;
SetPenColor(color);
Rectangle(x,(y-10*t),x+dx,y);
x:=x+dx+z
end
end.
Результат работы программы Graf_1 приведен на рисунке 1.
Рисунок 1. Гистограмма
Задание:
1. Разработать программу построения гистограммы, отражающей динамику дневной и ночной температуры воздуха за неделю.
Требования к программе:
1) Организовать в программе ввод значений температур.
2) При построении ночные температуры отображать прямоугольниками синего цвета, а дневные – красного. Между столбцами температур одного дня сделать нулевое расстояние.
3) Выполнить заливку столбиков гистограммы цветами, отличными от цветов границ, например, темно-красным или темно-синим, используя процедуру заливки FloodFill библиотеки GraphABC.
4) Ввести в гистограмме подписи значений температуры под соответствующими столбцами.
2. Известны Ф.И.О.студентов и их экзаменационные оценки за прошедшую сессию. Необходимо разработать программу построения круговой диаграммы, отражающей статистику успеваемости группы (процент студентов, сдавших сессию на одни пятерки, процент студентов сдавших сессию без троек, процент студентов сдавших сессию без двоек, процент студентов, не сдавших хотя бы один экзамен).
Пример:
Исходные данные:
Результат работы программы: