Program s123; Var x,y:real; Begin Writeln('F(x) =x²-3x 9 если x≤3, F(x)=(1)/(x² 6) если x>3'); Writeln('Введите значение переменной x'); Readln(x); If (x<3) or (x=3) Then y:=sqr(x)-3*x 9 Else y:=1/(sqr(x) 6); Writeln('F(x)=',y); End.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.