составить программу вычесления для любого из вырожений.
пожалуйста помогите
не понимаю как делать
опишите или сделайте хотя-бы один ПОЖАЛУЙСТА

Пример В)uses crt;var f,a,b,c:real;beginwriteln ('Введите число A');readln (a);writeln ('Введите число B');readln (b);writeln ('Введите число C');readln (c);F:=(sqrt(sqr(b)*2)-4*a*c);writeln('Ответ: ',f:2:1);end.