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