![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
![]() не понимаю как составить программу пожалйуста помогите((
|
#2
|
|||
|
|||
![]() Как сяду за компьютер - помогу.
|
#3
|
|||
|
|||
![]() спасибо буду ждать
|
#4
|
|||
|
|||
![]() жди,жди, за комп он уже садился
![]() |
#5
|
|||
|
|||
![]() Код, который вычисляет значение у от х:
Код:
program Project2; {$APPTYPE CONSOLE} uses SysUtils,math; var x,y,fx,tm1,tm2,tm3:real; begin { TODO -oUser -cConsole Main : Insert code here } writeln('X='); readln(x); writeln('Y='); readln(y); tm1:=cos(power(x,1/3)); tm2:=ln( power(2,x)+power(abs(x),2*tan(x)) )/ln(10); tm3:=arcsin(tm1/(tm1*tm1+7)); fx:=sqrt(abs(tm3+power(tm2,5))); writeln(fx); readln; end. |
#6
|
||||
|
||||
![]() Функция то линейная. Ну, как на меня, нужно вычислять, чтобы |X|+|Y| было меньше/равно половине стороны ромба:
Код:
if abs(X)+abs(Y)<=2 then {true} else {false};( Если центр ромба в начале координат. Но могу ошибаться. Нужно проверить. Обязательно. |