Задали сделать прогу, незнаю как составить. используя функции otr и area из proc16 и proc18, описать процедуру dist(px, py, ax, ay, bx, by, d), находящую расстояние d от точки p до прямой ab по формуле d = 2spab / |ab|, где spab — площадь треугольника pab. с этой процедуры найти расстояния от точки p до прямых ab, ac, bc, если даны координаты точек p, a, b, c. . proc16. описать функцию otr(ax, ay, bx, by) вещественного типа, находящую длину отрезка ab на плоскости по координатам его концов: |ab| = sqrt((ax-bx)2 + (ay-by)2) (ax, ay, bx, by — вещественные параметры с этой функции найти длины отрезков ab, ac, ad, если даны координаты точек a, b, c, d. proc18. используя функции otr и perim из proc16 и proc17, описать функцию area(ax, ay, bx, by, cx, cy) вещественного типа, находящую площадь треугольника abc по формуле герона: sabc = sqrt(p·(p–|ab|)·(p–|ac|)·(p–|bc| где p — полупериметр. с этой функции найти площади треугольников abc, abd, acd, если даны координаты точек a, b, c, d. (вот еще если понадобиться)proc17. используя функцию otr из proc16, описать функцию perim(ax, ay, bx, by, cx, cy) вещественного типа, находящую периметр треугольника abc по координатам его вершин (ax, ay, bx, by, cx, cy — вещественные параметры). с этой функции найти периметры треугольников abc, abd, acd, если даны координаты точек a, b, c, d. только напишите полностью с описательной частью т.е с началом и т.д . заранее огромное
Ответы
ответ:
если вы ищете ответ на вопрос, как пронумеровать страницы в опен офис, мы расскажем вам подробную поэтапную инструкцию, которая вам решить возникшую трудность.
текстовый редактор пакета программ опен офис под названием writer имеет похожий на известный всем word интерфейс, а потому пользоваться им просто. обычно трудности возникают в вопросе, как сделать нумерацию страниц в опен офисе, а эта функция довольно часто нужна пользователям, например, при написании дипломных работ. весь процесс состоит из 2 этапов.
вставка колонтитулов в опен офисе
первоначально нужно включить колонтитулы, на них будут размещены номера страниц. сначала решите, где вы хотите расположить нумерацию: если сверху – вам нужен верхний колонтитул, если снизу- нижний. пошаговая схема такая: nijkolontitul
откройте раздел меню вставка. после этого в меню найдите верхний колонтитул или нижний, в зависимости от вашей ситуации. затем нажмите обычный.
вы увидите на листе вверху или внизу колонтитул. кликните по нему мышкой.
справа вы увидите табличку с форматированием текста. здесь вы должны выбрать место для будущей нумерации страницы и указать ее формат.
переходим к завершающему этапу – непосредственно к тому, как в openoffice пронумеровать страницы.
проставляем нумерацию страниц в openoffice
инструкция следующая: nomerstranicy
снова войдите в раздел вставка. здесь в меню отыщите пункт поля.
нам нужен пункт номер страницы.
теперь каждый новый лист вашего текстового документа будет иметь свой номер. зачастую первый лист оставляют непронумерованным в качестве титульной страницы. мы расскажем вам, как быть в этой ситуации.
как проставить нумерацию, начиная со 2 листа в open office
сейчас вы узнаете, как пронумеровать страницы в опен офис без титульного листа. инструкция простая: numer4
нужно определить стиль титульной страницы: нажмите в меню на вкладку формат, затем кликните на стили, а потом на стиль страницы. выбираем вариант первая страница.
теперь открываем меню вставка и нажимаем разрыв, кликаем на разрыв страницы, жмем на стиль, нам нужен стиль обычный.
переходим на вторую страницу. теперь вставьте колонтитул и проставьте номера страниц по схеме, описанной выше.
так просто проставляется нумерация страниц в опен офисе с нужной вам страницы документа.
объяснение:
ответ:
1.
var a: array[1..6]of integer;
i,k: integer;
begin
k: =0;
write('массив: ');
for i: = 1 to 6 do
begin
a[i]: = random(5);
write(a[i]: 4);
if a[i]=4 then k: =k+1
end;
writeln;
if k=0 then writeln ('в массиве нет элементов равных 4')
else writeln('количество элементов равных 4 равно ',k)
end.
2.
var a: array[1..6,1..6]of integer;
b: array[1..36]of integer;
i,j,k,z,y,m: integer;
begin
k: =0;
writeln('массив a ');
for i: = 1 to 6 do
begin
for j: = 1 to 6 do
begin
a[i,j]: = random(51);
write(a[i,j]: 3);
end;
writeln;
end;
writeln;
k: =1;
for i: = 1 to 6 do
begin
for j: = 1 to 6 do
begin
for z: =1 to 6 do
begin
for y: =1 to 6 do
begin
if (z< > i) and (y< > j) and (a[i,j] = a[z,y]) then
begin
b[k]: =a[i,j];
k: =k+1
end;
end;
end;
end;
end;
writeln('массив b ');
for i: = 1 to k-1 do write (b[i]: 3);
writeln;
writeln;
m: =b[1];
for i: = 2 to k-1 do if b[i]> m then m: =b[i];
writeln('максимум среди элементов повторившихся более одного раза в массиве а равен ',m);
end.
объяснение:
в массиве b во второй находятся повторяющиеся элементы массива а.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
сделать можно на компе и скинуть фото нужно
Посчитать (x-1)(x-3)(x--63)/(x-2)(x-4)(x--64)
Сделайте игру arkanoid в программе python
