Question

составьте программу на паскаль z=7ad^ в квадрате

Answer 1

varx, a:real;beginread(a,x);if (a-10>0)thenwriteln('F=',0.2*sqr(sin(x))*ln(a-10))elsewriteln('ln(',a-10,')!!!');