Разработка программы на языке pascal для определения взаимного расположения (принадлежности) точки и прямой. (нужно сделать мат.модель, блок-схему, программу и таблицу исполнения 25

#1

RawList = [int(input()) for _ in range(int(input('arr len: ')))]

NewList = [i**2 for i in RawList]

print(*NewList)

#2

RawList = [float(input()) for _ in range(int(input('arr len: ')))]

RoundedSum = round(sum(RawList))

print(RoundedSum)

#3

RawList = [int(input()) for _ in range(int(input('arr len: ')))]

print( len( list(filter(lambda p: p < 0, RawList) ) ) )

#4

RawList = [int(input()) for _ in range(int(input('arr len: ')))]

print(*[ abs(i) for i in RawList])

#5 (Я не знаю украинский алфавит, по этому сделаю для английского)

RawList = [input() for i in range(int(input('Arr Len: ')))]

vows = ['a','i','o','u','e'] #Список гласных

print( len( list( filter( lambda p: p in vows, RawList

Объяснение:

#1

RawList = [int(input()) for _ in range(int(input('arr len: ')))]

NewList = [i**2 for i in RawList]

print(*NewList)

#2

RawList = [float(input()) for _ in range(int(input('arr len: ')))]

RoundedSum = round(sum(RawList))

print(RoundedSum)

#3

RawList = [int(input()) for _ in range(int(input('arr len: ')))]

print( len( list(filter(lambda p: p < 0, RawList) ) ) )

#4

RawList = [int(input()) for _ in range(int(input('arr len: ')))]

print(*[ abs(i) for i in RawList])

#5 (Я не знаю украинский алфавит, по этому сделаю для английского)

RawList = [input() for i in range(int(input('Arr Len: ')))]

vows = ['a','i','o','u','e'] #Список гласных

print( len( list( filter( lambda p: p in vows, RawList

Объяснение: