Вычислить значение выражения

@dendi · Регистрация: 19.04.2012

Студворк — интернет-сервис помощи студентам

Дано a,d.
Вычислить функцию z =1/3 •√(3&a) +1/4 • √(4&|b| ). Если z=0, вычислить F= arctg(z). Если z<0, вычислить и напечаать g = arcos(z) +e^(-2), иначе – вычислить p = z2+ a3•√(z^4+〖a•b〗^ ).

@Helfer · 17.12.2009, 19:27

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var z,f,g,p,a,b:real;
begin
writeln('Введите А и Б')
read(a,b);
z:={Выражение};
if z=0 then begin
F:={Выражение}; writeln(F); end;
if z<0 then begin
G:={Выражение}; writeln(G); end;
if z>0 then begin
P:={Выражение}; writeln(p); end;
end.

надеюсь выражения сам запишешь.

@dendi · 17.12.2009, 19:28

ооо снова ты! еше раз спасибо! выручаеш меня!=)

@Тамила · 17.12.2009, 19:37

Helfer, дело же не в этом... Вы обратите внимание (см. выше) на то, как этот человек "общается"...

Добавлено через 1 минуту

Сообщение от DENDI

z =1/3 •√(3&a) +1/4 • √(4&|b| ). Если z=0, вычислить F= arctg(z). Если z<0, вычислить и напечаать g = arcos(z) +e^(-2), иначе – вычислить p = z2+ a3•√(z^4+〖a•b〗^ )

я тут вообще мало что поняла...

@Helfer · 17.12.2009, 19:39

Тамила, ну дык поэтому то я и сделал "универсальный" код =В Может он и не на програмиста учиться, бывает и такое, что нормальным людям мозг любят в учебных заведениях))))

@dendi · 17.12.2009, 19:43

не там что написано! я то писал в ворде!!ну там корень степень, а скинул суда а он их (корни ) вот так вот записыват! вот в чем дело! попробуйте это скопировать в ворд и все станет ясно!

@Helfer · 17.12.2009, 19:49

DENDI, тут кодировка другая, ничего не выйдет. Ты бы лучше скриншот сделал, и выложил ссылку через радикал, так бы лучше было)

@dendi · 17.12.2009, 19:51

хмм !учту учту! а можно там фотку к задачки прикрепить?

@Helfer · 17.12.2009, 19:54

DENDI,Например через , а потом вложить ссылку.

@dendi · 17.12.2009, 20:00

вот так вот?

@Delphin_KKC · 17.12.2009, 20:00

Мне больше по душе этот ресурс: http://piccy.kiev.ua/

@dendi · 17.12.2009, 20:04

вот так вот! все понял спасибо за подскзку!

@Delphin_KKC · 17.12.2009, 20:07

Сообщение от DENDI

вот так вот?

Сообщение от DENDI

вот так вот! все понял спасибо за подскзку!

Два разных ресурса с двумя разными картинками. Так для какой, всёж, прогу писать?

@Helfer · 17.12.2009, 20:07

Вставь 3юю ссылку, там где увеличение по клику

@dendi · 17.12.2009, 20:13

Delphin_KKC для обоих!! если можно!

Добавлено через 2 минуты
а может лучше шрифт побольше?

@Helfer · 17.12.2009, 20:13

Извини , делфи неучил, и паскаль только осваиваем)

@dendi · 17.12.2009, 20:21

эх фигова дело! ну все равно спасибо за помошь!

Добавлено через 3 минуты
Delphin_KKC, получается проги написать?

@Delphin_KKC · 17.12.2009, 20:30

Сообщение от DENDI

эх фигова дело! ну все равно спасибо за помошь!

Добавлено через 3 минуты
Delphin_KKC, получается проги написать?

Для первой (на основе кода от Helfer)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses math;
var z,f,g,p,a,b:real;
begin
writeln('Введите А и Б');
read(a,b);
z:=(power(a,1/3)/3)+sqrt(sqrt(abs(b)))/4;
if z=0 then begin
F:=ArcTan(z); writeln(F); end;
if z<0 then begin
G:=ArcCos(z)+exp(-2); writeln(G); end;
if z>0 then begin
P:=sqr(z)+sqr(a)*a*sqrt(power(z,4)+a*sqr(b)); writeln(p); end;
end.

тут не ясно в какой степени b под корнем в последней формуле. Решил что в квадрате

З.Ы. Использую TMT Pascal Light 3.90. Есть ли функция power в борландовском чуде - не знаю.

@dendi · 17.12.2009, 20:41

Delphin_KKC, нее там вообше никакой степени нету!

Новые блоги и статьи Все статьи Все блоги /
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801

	Вычислить значение выражения 17.12.2009, 18:33. Показов 1816. Ответов 18 Метки нет (Все метки) Дано a,d. Вычислить функцию z =1/3 •√(3&a) +1/4 • √(4&\|b\| ). Если z=0, вычислить F= arctg(z). Если z<0, вычислить и напечаать g = arcos(z) +e^(-2), иначе – вычислить p = z2+ a3•√(z^4+〖a•b〗^ ). 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 19:28
	ооо снова ты! еше раз спасибо! выручаеш меня!=) 0

@Helfer ЙожЪ 64 / 60 / 17 Регистрация: 23.10.2009 Сообщений: 652
	17.12.2009, 19:39
	Тамила, ну дык поэтому то я и сделал "универсальный" код =В Может он и не на програмиста учиться, бывает и такое, что нормальным людям мозг любят в учебных заведениях)))) 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 19:43
	не там что написано! я то писал в ворде!!ну там корень степень, а скинул суда а он их (корни ) вот так вот записыват! вот в чем дело! попробуйте это скопировать в ворд и все станет ясно! 0

@Helfer ЙожЪ 64 / 60 / 17 Регистрация: 23.10.2009 Сообщений: 652
	17.12.2009, 19:49
	DENDI, тут кодировка другая, ничего не выйдет. Ты бы лучше скриншот сделал, и выложил ссылку через радикал, так бы лучше было) 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 19:51
	хмм !учту учту! а можно там фотку к задачки прикрепить? 0

@Helfer ЙожЪ 64 / 60 / 17 Регистрация: 23.10.2009 Сообщений: 652
	17.12.2009, 19:54
	DENDI,Например через , а потом вложить ссылку. 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 20:00
	вот так вот? 0

@Delphin_KKC UNIX-way 712 / 495 / 49 Регистрация: 15.01.2009 Сообщений: 1,720
	17.12.2009, 20:00
	Мне больше по душе этот ресурс: http://piccy.kiev.ua/ 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 20:04
	вот так вот! все понял спасибо за подскзку! 0

@Helfer ЙожЪ 64 / 60 / 17 Регистрация: 23.10.2009 Сообщений: 652
	17.12.2009, 20:07
	Вставь 3юю ссылку, там где увеличение по клику 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 20:13
	Delphin_KKC для обоих!! если можно! Добавлено через 2 минуты а может лучше шрифт побольше? 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 20:21
	эх фигова дело! ну все равно спасибо за помошь! Добавлено через 3 минуты Delphin_KKC, получается проги написать? 0

@dendi 77 / 76 / 0 Регистрация: 19.04.2012 Сообщений: 801
	17.12.2009, 20:41
	Delphin_KKC, нее там вообше никакой степени нету! 0