Регистрация
PROматематик
16.05.2023 02:38
Информатика
Есть ответ 👍

перевести код с питона на паскаль.

условие:

Дано количество точек на плоскости, затем сами точки. Они описывают выпуклый многоугольник на плоскости. Найти площадь многоугольника (использовать косое произведение)

код:

n = int(input())
arr = []
for i in range(n):
! arr.append([int(x) for x in input().split()])
s = 0
for i in range(n):
! a = arr[i]
! b = arr[(i+1) % n]
! s += (a[0] * b[1] - a[1] * b[0]) / 2
print(s)

! там, где должны быть tabы

n = int(input())
arr = []
f = 1
for i in range(n):
! arr.append([int(x) for x in input().split()])
for i in range(n):
! a = arr[i]
! b = arr[(i+1) % n]
! c = arr[(i + 2) % n]
! x1 = b[0] - a[0]
! y1 = b[1] - a[1]
! x2 = c[0] - b[0]
! y2 = c[1] - b[1]
! s = (x1 * y2 - x2 * y1) / 2
! if i == 0:
! ! if s > 0:
! ! ! p = 1
! ! else:
! ! ! p = -1
! else:
! ! if p * s < 0:
! ! ! print('Не выпуклый!')
! ! ! f = 0
if f == 1:
! print('Выпуклый!')

275
399
Посмотреть ответы 1

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

Camall
Camall
4,4(44 оценок)
A  =  p/4 s  =  a*a вывод s весь алгоритм собсна

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