Вычислить значения функции f(x)=A*sin(x)*cos(x) в интервале [a,b], разбив заданный интервал на n отрезков и вывести их на печать.
Построить блок-схему алгоритма.

Полноценное изучение языка - это не такая уж простая задача. мало просто прочитать книгу, нужно ещё и долго познавать дзен, и при том не только этого языка. я вообще удивляюсь, как можно загружать школьников паскалем, ведь, он не так уж и прост по сегодняшним меркам. в то время как реально качественное его изучение требует вдумчивости, усидчивости и практики.
важным фактором является знание английского. так разработка всех ведущих языков ведётся на англ и вся дока написана на нём.
на сегодняшний день, ведущим разработчиком компиляторов для Pascal является организация FreePascal. соответственно, доку и компилятор, я бы посоветовал использовать именно их.

а вообще, лучше бы ты задал более конкретный вопрос.

#!/usr/bin/python3

import math

a = 1.0
b = 2.0
c = 3.0

A = math.degrees(math.acos(math.radians(((b**2 + c**2 - a**2) / 2 * b * c
B = math.degrees(math.acos(math.radians(((a**2 + c**2 - b**2) / 2 * a * c
C = math.degrees(math.acos(math.radians(((a**2 + b**2 - c**2) / 2 * a * b

ravnobedr = (a == b and a == c) or (a == b and b == c) or (a == c and b == c)
ravostor = a == b == c

priamoug = A == 90 or B == 90 or C == 90

ostroug = A < 90 or B < 90 or C < 90

tupoug = A > 90 or B > 90 or C > 90

print(
    '''
равнобедренный {}
равносторонний {}

прямоугольный  {}
остроугольный  {}
тупоугольный   {}
'''.format(
        ravnobedr,
        ravostor,
        priamoug,
        ostroug,
        tupoug,
    )
)