Question

даю 100, но если вы ответили на этот вопрос-можете так же ответить на такой же мой прошлый вопрос и получите еще 80. Я поставлю корону и нажму спасибо.
Составить блок-схему и программу для решения задачи на паскаль.

Answer 1

##

var (a, x) := ReadReal2;

var y := x < 5 ? a * x ** 2 + 1 : 3 * a ** 2 - x;

Print(y)

Блок-схема приведена во вложении.