Написать программу в паскале и схему. Пожалуйста. Даны три вещественных числа. В?

Написать программу в паскале и схему. Пожалуйста. Даны три вещественных числа. В??звести в квадрат те из них, значения которых неотрицательны, и в четвертую степень - отрицательные