Работа в Microsoft Excel
Задача 3.
Предприятие ООО «Верона» в первом квартале реализовало продукцию на 300
тыс. руб. Среднеквартальный остаток оборотных средств составляет 23 тыс. руб. В
связи с планированием деятельности предприятия во втором квартале планируется
увеличение объема реализации на 10%, а время одного оборота оборотных средств
будет сокращено на один день. Определить: коэффициент оборота оборотных
средств и продолжительность одного оборота в первом квартале, коэффициент
оборота оборотных средств и их абсолютный размер во втором квартале,
высвобождение оборотных средств, вследствие сокращения продолжительности
одного оборота оборотных средств. Провести анализ скорости оборота средств и
сделать выводы по предложенному планированию во втором квартале
Задача 4.
Годовой объем реализации продукции предприятия ООО «СОВТРАНС»
составил 5 тыс. шт. продукции, себестоимость единицы продукции - 180тыс. руб.,
цена реализации на 15% превышает себестоимость.
Среднегодовой остаток оборотных средств - 145 млн. руб. Определить
коэффициент оборачиваемости оборотных средств, длительность одного оборота и
коэффициент загрузки.
Провести анализ данных расчетов и сделать выводы о рентабельности
предприятия.
Задача 5.
Необходимо определить объем выпускаемой продукции асфальтобетонного
завода за год, за два и за три года, если коэффициент оборачиваемости – 2,2, объем
оборотных средств за год – 150 млн. рублей.
На основании проведенных расчетов построить объемную круговую диаграмму.
Провести анализ и записать выводы по работе данного предприятия за три года.

👇

Открыть все ответы

Ответ:

alekseyblohinov

24.12.2020

Треугольник существует, если сумма длин двух любых его сторон больше длины третьей стороны.
Длина стороны может быть определена как расстояние между соответствующими сторонами треугольника:
$\displaystyle L_{AB}=\sqrt{(x_B-x_A)^2+(y_B-y_A)^2$

// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
type
Point=record
x,y:real
end;

procedure GetPoint(c:char;var M:Point);
begin
Write('Введите координаты точки ',c,': ');
Read(M.x,M.y)
end;

function Dist(a,b:Point):=sqrt(sqr(b.x-a.x)+sqr(b.y-a.y));

begin
var A,B,C:Point;
GetPoint('A',A); GetPoint('B',B); GetPoint('C',C);
var ab:=Dist(A,B);
var bc:=Dist(B,C);
var ac:=Dist(A,C);
if (ab<bc+ac) and (bc<ab+ac) and (ac<ab+bc) then
Writeln('Треугольник существует')
else Writeln('Треугольник не существует')
end.

Тестовое решение:
Введите координаты точки A: -6.9 -5.3
Введите координаты точки B: 0 11.4
Введите координаты точки C: 9 3
Треугольник существует

4,7(40 оценок)

Ответ:

SuperMine

24.12.2020

//Pascal ABC.NET v3.0 сборка 1111

Const
s=5;

Var
ar:array[1..s] of integer;
n,m,i:integer;
begin
writeln('N');
readln(n);
writeln('M');
readln(m);
writeln('Array:');
for i:=1 to s do
readln(ar[i]);
writeln('First array:');
for i:=1 to s do
begin
write(ar[i]:4);
if ar[i] div n<>0 then ar[i]:=ar[i]+m;
end;
writeln;
writeln('Final array:');
for i:=1 to s do
write(ar[i]:4);
end.

Пример ввода:
3
3
1
2
3
4
5
Пример вывода:
First array:
1 2 3 4 5
Final array:
1 2 6 7 8

//Блок-схема во вложении
Ввести двумерный массив a. все элементы, которые при целочисленном делении на n ненулевое значение,