Помогите, пожалуйста, с Турбо Паскалем

Нужно мне программу по алгоритму условной структуры для уранения вида y = tgx - c
Первый раз вообще с Паскалем работаю
Вроде всё написала, а он мне всё равно какую-то ошибку выдаёт

Подскажите, что не так делаю, где исправить нужно?