Написать программу решения следующей : определить периметры трѐх треугольников, если заданы координаты их вершин. использовать подпрограмму-функцию

👇

Ответ:

MrLeysanHD

13.04.2023

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 uses crt; var i,xa,ya,xb,yb,xc,yc: integer; function Dlina(x1,y1,x2,y2: integer):real; var d: real; begin d:= sqrt(sqr(y1-y2)+sqr(x1-x2)); Dlina:=d; end; function Perimetr(a,b,c: real): real; begin Perimetr:=a+b+c; end; procedure Vvod (nt: byte; var ax,ay,bx,by,cx,cy: integer); begin writeln ('Координаты вершины A ',nt,' треугольника'); readln (ax,ay); writeln ('Координаты вершины B ',nt,' треугольника'); readln (bx,by); writeln ('Координаты вершины C ',nt,' треугольника'); readln (cx,cy); end; begin for i:=1 to 3 do begin Vvod (i,xa,ya,xb,yb,xc,yc); writeln ('Периметр ',i,' треугольника = ',Perimetr(Dlina(xa,ya,xb,yb),Dlina(xb,yb,xc,yc),Dlina(xc,yc,xa,ya)):0:2); writeln; end; readkey end.

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

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

Ответ:

tatiana85gandzii

13.04.2023

ответ: K = 0, L = 0, M = 0, N = 1.

Строишь таблицу истинности. Просто выполняешь каждое действие и заносишь его в таблицу.
⇒ импликация. Таблица истинности во вложении. Если математически, то это условие: a ≤ b. Если оно выполняется, то условие истинно.
Т.е. если a = 1, b = 0, то a ⇒ b = 0(ложь). Во всех остальных случаях 1(истина).

Выполнять надо по приоритету, как в математике. Сначала отрицание ¬, умножение ∧, сложение ∨ и т.д. Импликацию ⇒ обычно делают в конце, если нет эквивалентности ~. Ну и стоит обращать внимание на скобки.

4,5(22 оценок)

Ответ:

ПрофиЗнания

13.04.2023

В курсе информатики при изучении раздела "Алгоритмы и исполнители" рассматривают исполнителя Чертежник.

Чертежник - это виртуальный компьютерный исполнитель, который предназначен для построения рисунков и чертежей на координатной плоскости, и представляет собой перо, которое может поднимать, опускать и перемещать.

При перемещении опущенного пера за ним остается след.

Среда обитания - часть координатной плоскости (1-я четверть, где х и у - положительны).

Начальное положение Чертежника - точка (0; 0) и перо поднято.

После исполнения программы перо должно быть поднято и и находится в начале координат - точке (0; 0).

Основные команды:

field(m,n) - создать поле размером m×n

topoint(x,y) - переместить перо в точку (х; у)

penup - поднять перо

pendown - опустить перо

onvector(a,b) - сместить перо на вектор (a; b)

m и n - натуральные числа

х и у - целые числа