Практическая работа
Тема: Построение и форматирование диаграмм в MS Word
Порядок работы
1. Откройте текстовый редактор MS Word.
2. Создайте в текущем документе 3 страницы (Вставка — Разрыв страницы).
3. Прочитайте задания и выполните их.
Задание 1. Наибольшая глубина озера Байкал – 1620 м, Онежского озера — 127 м, озера Иссык-
Куль — 668 м, Ладожского озера – 225 м.
1. На основании представленной информации постройте таблицу и создайте Гистограмму с
группировкой.
2. Отформатируйте диаграмму: добавьте заголовок «Глубина озер»; выберите стиль диаграммы
наиболее понравившийся, разместите Легенду - снизу; добавьте Подписи данных - У вершины,
снаружи.
3. Измените размер области построения диаграммы.
4. Перейдите на следующую страницу.
Задание 2. Суша на Земле распределена следующим образом: леса занимают площадь 57 млн км*,
степи - 24 млн км”, тундры, пустыни и болота - 54 млн км* и пашня - 15 млн км“.
1. На основании этой информации постройте таблицу и диаграмму. Тип диаграммы выберите
самостоятельно. Отформатируйте диаграмму.
2. Перейдите на следующую страницу.
Задание 3. Дана функция y=x”, для х= --3; -2; -1; 0; 1; 2; 3.
1. Построить диаграмму Точечная с гладкими кривыми функции y=x®, для значений
X = -3; -2; -1; 0; 1; 2; 3.
1. Заполнить таблицу по построенному графику, выбрав удобный Макет диаграммы:
2. ответьте на во На каком промежутке функция убывает?
Б) На каком промежутке функция возрастает?​

Программа:

{Free Pascal Compiler version 3.0.4+dfsg-23 [2019/11/25] for x86_64}

{Copyright (c) 1993-2017 by Florian Klaempfl and others}

{Target OS: Linux for x86-64}

program test;

const

 start = -100;

 finish = 50;

 count = 100;

var

 X : array of integer; {массив}

 i : integer; {Счётчик цикла}

 S : integer; {Сумма положительных}

begin

Randomize;

SetLength(X, count+1);

{Генерация массива из 100 элементов от -50 до 50}

for i := 1 to count do

 X[i] := Round( Random * start) + finish;

{Вывод сгенерированного массива на экран}

for i := 1 to count do

 write(X[i]:4);

writeln; writeln;

{Подсчёт положительных элементов}

S := 0;

for i := 1 to count do

 if (x[i] > 0) then

  S := S + x[i];

writeln('Сумма положительных S = ', S);

end.

#include <iostream>

#include <vector>

#include <cstdint>

using namespace std;  template <class T>

istream& operator>>(istream &in, vector<T> &vec) {   for (auto &it : vec)     in >> it;   return in;

}  

template <class T>

ostream& operator<<(ostream &out, vector<T> &vec) {   for (auto &it : vec)     out << it << ' ';   return out;

}  

template <class T, class U>

istream& operator>>(istream &in, pair<T, U> &pair) {   in >> pair.first >> pair.second;   return in;

}  

template <class T, class U>

ostream& operator<<(ostream &out, pair<T, U> &pair) {   out << pair.first << ' ' << pair.second;   return out;

}

signed main(void) {     int32_t n; cin >> n;     vector<vector<int64_t>> a(n, vector<int64_t>(n,-1));     int64_t x = 0, y = n/2;     a[x][y] = 1;     for(int32_t i = 2; i <= n*n; ++i) {         int _x = x, _y = y;         if(!x) {             x =  n-1;         }         else {             --x;         }         if(y == n-1) {             y = 0;         }         else {             ++y;         }         if(a[x][y] != -1) {             x= _x, y = _y;             while(a[x][y] != -1) {                 if(x == n-1) {                     x = 0;                 }                 else {                     ++x;                 }             }         }         a[x][y] = i;     }     for(int32_t i = 0; i < n; ++i) {         cout << a[i] << '\n';     }     return 0;  }

Объяснение: