Написать программу на языке паскаль (разветвляющийся алгоритм):1) F=x2-3 (икс в квадрате минус три), x2=x*x (x в квадрате равен x умножить на x)2) S=1/2ab (одна вторая а б)3) С=a2-b2 (а в квадрате минус б в квадрате)

Предыдущий
вопрос Следующий
вопрос

program BranchingAlgorithm;

va
x, a, b, F, S, C: real;

begi
write('Enter the value of x: ')
readln(x);

F := x * x - 3;

write('Enter the value of a: ')
readln(a);

write('Enter the value of b: ')
readln(b);

S := 0.5 a b
C := a a - b b;

writeln('F = ', F)
writeln('S = ', S)
writeln('C = ', C);

end.