Регистрация Спросить otvet5GPT
SonyaKot1
13.11.2022 18:04
Информатика
Есть ответ 👍

Задание для выполнения: задана таблица Учет товаров на складе (для каждого вариан- та своя таблица, соответствующая номеру варианта). Таблица имеет вид базы дан-
ных, состоящей из сведений о продаже товаров со склада. Запись указывает, какой орга-
низации продан товар, когда проведена продажа, наименование товара, единицы из-
мерения товара, его стоимость и количество. В столбец Дебет заносится сумма оп-
лаченного товара. В столбец Кредит заносится стоимость товара, отпущенного в долг
(стоимость товаров вычисляется по формуле «=Цена*Кол-во»). В последнем столбце
указывается форма оплаты: безналичный расчет (б/р), бартер (бар), наличный расчет
(н/р).
Создать таблицу в редакторе MS Excel на Листе 1 и сохранить ее в виде отдельного фай-
ла. Каждое новое задание выполняется на отдельном рабочем листе с соответст-
вующим заданию именем. Все листы в рабочей книге должны располагаться в после-
довательности выполнения задания. Первый рабочий лист должен содержать исходную
таблицу и иметь имя «Исходные данные».
Выполнить все задания согласно своему варианту:
1. Сортировка записей в таблице.
1.1. Скопировать таблицу с листа «Исходные данные» на новый лист (Сортиров-
ка).
1.2. На рабочем листе Сортировка упорядочить расположение записей в таб-
лице по следующим параметрам:
1.2.1. отсортировать наименования организаций в алфавитном порядке,
внутри каждой организации отсортировать наименование товара в алфа-
витном порядке и внутри каждого наименования товара отсортировать по
возрастанию стоимость проданного товара.
2. Автофильтр.
2.1. Скопировать таблицу с листа «Исходные данные» на новый лист (Авто-
фильтр)
2.2. С функции Автофильтр выбрать из заданного списка
2.2.1. записи, содержащие товар «пуговицы»;
2.2.2. записи, содержащие товар «пуговицы», приобретенный по безна-
личному расчету;
2.2.3. записи, содержащие товар «пуговицы», в которых количество опла-
ченного товара больше 0;
2.2.4. записи, содержащие товар «тк. подкладочная» и дату продажи то-
вара в промежутке после 22 марта до 1 июня. При выполнении задания ис-
пользовать логические условия И и ИЛИ;
2.2.5. записи, содержащие товар «тк. подкладочная», а в поле Количество 2
установить условие: больше 2000, но меньше 10000. При выполнении за-
дания использовать логические условия И и ИЛИ;
2.3. В отчет включить сформированные условия отбора записей и результат вы-
полнения запроса.
3. Фильтрация данных.
3.1. Скопировать таблицу с листа «Исходные данные» на новый лист (Расширен-
ный фильтр).
3.2. Выполнить задание п. 2.2, воспользовавшись функцией Расширенный
фильтр.
3.3. В отчет включить сформированный критерий отбора записей и результат
выполнения условий отбора.
4. Фильтрация данных с использованием вычисляемого критерия.
4.1. Скопировать таблицу с листа «Исходные данные» на новый лист (Вычисляе-
мый критерий).
4.2. Сформировать вычисляемый критерий и с функции Расширен-
ный фильтр выбрать из списка:
4.2.1. записи, содержащие товар, отпущенный в кредит, количество ко-
торого превышает среднее значение количества всех отпущенных в кре-
дит товаров и оплаченный, количество которого превышает среднее значе-
ние количества всех оплаченных товаров;
4.2.2. записи, содержащие товар, отпущенный в кредит, количество ко-
торого превышает среднее значение количества всех отпущенных в кре-
дит товаров или оплаченный, количество которого превышает среднее
значение количества всех оплаченных товаров и при условии, что весь то-
вар отпущен со склада по бартеру;
5. Автоматическое подведение итогов.
5.1. Скопировать таблицу с листа «Исходные данные» на новый лист (Итоги).
5.2. Выполнить операцию автоматического подведения итогов и построить диа-
грамму на основе полученных результатов:
5.2.1. необходимо подвести итоги о стоимости всех оплаченных товаров
и товаров, отпущенных в кредит по каждому месяцу;
5.2.2. на основе итоговых результатов построить простую столбцовую
диаграмму. Диаграмму расположить на отдельном листе.

216
344
Посмотреть ответы 1

Ответы на вопрос:

vladasic
vladasic
4,5(66 оценок)
Перед комментом " {eto ! }" вобьешь уравнения uses crt,graphabc; const t = 100; n = 5; var i,j,i1,j1,mn: integer; var alpha: real; type colortype=integer; type point = record; x, y: integer; end; type point3d = record; x, y: integer; end; const lx = -100; ly = -100; lz = -100; procedure osi; begin  setpenwidth(3);   line(400,0,400,800);   line(0,400,800,400);   line(800,0,0,800); end; function to2dx(x,y,z: integer; phi: real): integer; var x1, y1, z1: integer;   begin    x1 : = trunc( x * cos(phi) - y * sin(phi) );     y1 : = trunc( x * sin(phi) + y * cos(phi) );     z1 : = z;     to2dx : = 400 + y1 - trunc(0.3 * x1);   end;   function to2dy(x,y,z: integer; phi: real): integer; var x1, y1, z1: integer;   begin    x : = trunc( x * cos(phi) - y * sin(phi) );     y : = trunc( x * sin(phi) + y * cos(phi) );     z1 : = z;     to2dy : = 400 - z + trunc(0.4 * x);   end; procedure line3d(x,y,z,x1,y1,z1: integer; phi: real); begin  line(to2dx(x,y,z, phi), to2dy(x,y,z, phi), to2dx(x1,y1,z1, phi), to2dy(x1,y1,z1, phi))end; procedure lineto3d(x1,y1,z1: integer; phi: real); begin  lineto(to2dx(x1,y1,z1, phi),to2dy(x1,y1,z1, phi))end; procedure moveto3d(x1,y1,z1: integer; phi: real); begin  moveto(to2dx(x1,y1,z1, phi),to2dy(x1,y1,z1, phi))end; procedure drawtriangle(x1, y1, z1, x2, y2, z2, x3, y3, z3 : integer; phi: real); var triangle : array[1..3] of point; var nx, ny, nz : real; var cs, s: real; begin      triangle[1].x : = to2dx(x1, y1, z1, phi); triangle[1].y : = to2dy(x1, y1, z1, phi);       triangle[2].x : = to2dx(x2, y2, z2, phi); triangle[2].y : = to2dy(x2, y2, z2, phi);       triangle[3].x : = to2dx(x3, y3, z3, phi); triangle[3].y : = to2dy(x3, y3, z3, phi);       x1 : = x3 - x1; y1 : = y3 - y1; z3 : = z3 - z1;       x2 : = x3 - x2; y2 : = y3 - y2; z3 : = z3 - z2;       nx : = y1 * z2 - y2 * z1;       ny : = z1 * x2 - z2 * x1;       nz : = x1 * y2 - x2 * y1;       try      cs : = abs(       (nx * lx + ny * ly + nz * lz) / sqrt(nx*nx + ny*ny + nz*nz) / sqrt(lx*lx + ly*ly + lz*lz)       );       setbrushcolor(rgb(trunc(100 * cs), trunc(100 * cs), trunc(100 * ;       setpencolor(rgb(trunc(100 * cs), trunc(100 * cs), trunc(100 * ;       polygon(triangle, 3);       except      end; end; procedure draw(f: function(x,y: real): real; color1: colortype; phi: real); beginsetpenwidth(1); setpencolor(color1); for j1: =-trunc(t/n) to trunc(t/n) dobeginj: =j1*n; moveto3d(j,-t,trunc(f(j,- phi); for i1: =-trunc(t/n) to trunc(t/n) dobegini: =i1*n; lineto3d(j,i,trunc(f(j, phi); end; end; for i1: =-trunc(t/n) to trunc(t/n) dobegini: =i1*n; moveto3d(-t,i,trunc(f(-t, phi); for j1: =-trunc(t/n) to trunc(t/n) dobeginj: =j1*n; lineto3d(j,i,trunc(f(j, phi); end; end; end; function p(x,y: real): real; var a: integer; begintryp: =sin((x * x - y * y) / 2000) * 50; {eto ! }except  p: =1; end; end; beginlockdrawing; setwindowheight(800); setwindowwidth(800); alpha : = 0; while true dobeginclearwindow(); draw(p, rgb(255, 0, 0), alpha); redraw; alpha : = alpha - 0.03; delay(5); end; end.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

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

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS