Д0лгат
30.10.2022 16:39

Практическая работа № 5

построение диаграмм в microsoft office excel 2007

создайте таблицу по образцу (рис. 1).

ячейки в столбце f имеют формат процентный, а количество десятичных знаков = 0.

в ячейке f5 формула должна содержать абсолютную ссылку на ячейку е9: =е5/$e$9. в этом случае при копировании ячейки f5 в ячейки f6, f7, f8, абсолютная ссылка $e$9 останется неизменной, а будет меняться только относительная ссылка по столбцу е (е6, е7, е8).

hello_html_m7b4a5549.png

по данным таблицы постройте диаграмму, выберите для данных таблицы ячейки f5: f8. используйте ниже виды диаграмм.

hello_html_422994e8.png

отредактируйте диаграмму:

– внесите название диаграммы продажа мороженного за лето 1999 года;

– задайте подписи оси х, используя данные диапазона ячеек а5: а8;

– задайте объемный вариант круговой диаграммы используя те же данные таблицы;

– измените имя текущего листа на новое – мороженое.

на листе 2 создайте следующую таблицу и следующие диаграммы.

- для первой диаграммы выберите тип - с областями и накоплением.

- для второй диаграммы выберите тип – нормированная с областями и накоплением.

- добавьте легенду и необходимые подписи к осям.

- у второй диаграммы измените заливку на рисунок или текстура.

рисунок 3

hello_html_76bb3631.png

hello_html_4e3f814c.png

hello_html_4684dc68.png

на листе 3 создайте следующую таблицу и следующую диаграмму.

тип диаграммы - лепестковая с маркерами.

рисунок 4

hello_html_32674780.png

hello_html_m4ce461e8.png

на листе 4 по табличным данным постройте график функции y(x)

hello_html_b453a9a.png

hello_html_m45f6056c.png

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
alenasamok
10.03.2022 01:35
Program z1;  Var i,n,a,b,c:integer;      m: array [1..1000] of integer;Begin  write('Введите кол-во чисел - ');  readln(n);   randomize;   a:=0;   b:=0;   c:=0;  for i:=1 to n do  begin    m[i]:=random(100)-50;    write (m[i],' ');  end;    for i:=1 to n do    if (m[i]=0) then a:=a+1;      for i:=1 to n do    if (m[i]>0) then b:=b+1;      for i:=1 to n do    if (m[i]<0) then c:=c+1;  writeln;  writeln ('Кол-во нулей - ',a);  writeln ('Кол-во положительных чисел - ',b);  writeln ('Кол-во отрицательных чисел - ',c);End.
0,0(0 оценок)
Ответ:
margaritamaurses
25.09.2020 16:08
// PascalABC.NET 3.0, сборка 1088
const
  nn=100;
type
  tA=array[1..nn] of integer;

procedure MaxElem(n:integer; var m:ta; var mx:integer);
var
  i:integer;
begin
  mx:=m[1];
  for i:=2 to n do
    if m[i]>mx then mx:=m[i]
end;

var
  a:tA;
  i,n,amax:integer;
begin
  Write('Введите количество элементов в массиве: '); Read(n);
  Randomize;
  Writeln('Элементы массива');
  for i := 1 to n do
  begin
    a[i]:=Random(101)-50;
    Write(a[i],' ')
  end;
  Writeln;
  MaxElem(n,a,amax);
  Writeln('Максимальный элемент равен ',amax);
end.

Тестовое решение:
Введите количество элементов в массиве: 15
Элементы массива
-8 41 7 -40 -1 1 -18 5 -28 26 50 13 -42 39 -43
Максимальный элемент равен 50
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота