const
pi = 3.18;
k = 2.7;
var
f, x: real;
begin
write('x = ');
read(x);
if x < -pi / 2 then writeln('f(x) = ', (2 * sqr(sin(x / 2)) / x));
if x >= -pi / 2 then writeln('f(x) = ', exp(sqr(x)) + cos(2 * k * x));
<span>end.</span>
2^9=512 различных комбинаций значений переменных
Готово...............................
То 5 градусов то 15 градусов
изменение давление не изменяется
Роза ветров 365км-сек
Program outr;
var a,b,c:real;
begin
readln(a,b,c);
writeln('a=',a,' b=',b,' c=',c);
if (a+c>b) and (a+b>c) and (c+b>a) then
begin
if (a*a=b*b+c*c) or (b*b=a*a+c*c) or (c*c=a*a+b*b) then
writeln('треугольник прямоугольный');
end else
writeln('треугольник построить невозможно');
<span>end.</span>