|
Математика Методы математического моделлирования, программирование математических концепций, роль математики в создании игр |
07.10.2009, 23:14
|
#1
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Формулы в ТурбоПаскале
Задали сестре в школе по информатике написать программку в ТурбоПаскале, что вычисляет по следующим формулам (привожу отсканированое задание). Я в шоке, раньше все сам ей решал, но в этот раз "жопа"(сори за выражение).. Решить не удается.. Помогите кто силен в математике...
__________________
Уважай собеседника, а лучше подари ему +
Последний раз редактировалось Trazzy, 16.09.2010 в 03:48.
|
(Offline)
|
|
07.10.2009, 23:53
|
#2
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Ответ: Формулы в ТурбоПаскале
Первая будет
Y:=abs(cos(2*x*x*x)+2*sin(x/1.2-3.4))+10.51*cos(abs(3*x));
Вторая
Y:=18.4*(cos(abs(x)))*sin(x*x-2.5);
А в третьей не прочитать, что написано.
|
(Offline)
|
|
08.10.2009, 00:17
|
#3
|
Зануда с интернетом
Регистрация: 04.09.2005
Сообщений: 14,014
Написано 6,798 полезных сообщений (для 20,935 пользователей)
|
Ответ: Формулы в ТурбоПаскале
Возможно нужно провести коррекцию угла (градусы-ту-радианы) для тригнометрических фунЕций.
Третье:
в два цикла считаем a & b с кол-вом итераций i+8 и i+5 (i=11), соответственно, затем производим две простых операции и получаем финал в Z.
__________________
http://nabatchikov.com
Мир нужно делать лучше и чище. Иначе, зачем мы живем? tormoz
А я растила сына на преданьях
о принцах, троллях, потайных свиданьях,
погонях, похищениях невест.
Да кто же знал, что сказка душу съест?
|
(Offline)
|
|
08.10.2009, 04:41
|
#4
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
а не так случайно: 2*(x^3) ???
в два цикла считаем a & b с кол-вом итераций i+8 и i+5 (i=11), соответственно, затем производим две простых операции и получаем финал в Z.
|
Код в студию! Если не трудно))
__________________
Уважай собеседника, а лучше подари ему +
Последний раз редактировалось Trazzy, 08.10.2009 в 04:41.
Причина: добавил:)
|
(Offline)
|
|
08.10.2009, 10:44
|
#5
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Ответ: Формулы в ТурбоПаскале
Сообщение от ArtikZ
а не так случайно: 2*(x^3) ???
|
В паскале оператора возведения в степень нет.
Можно для больших степеней функцию писать (что-то с логарифмами, так сходу не вспомню), а вданном случае проще перемножить, поскольку степень небольшая.
А "^" это указатель (Pointer).
|
(Offline)
|
|
08.10.2009, 14:47
|
#6
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
Пока только сложил программку из того что есть:
program krutaya;
uses crt;
var v, x: integer;
const i=11;
begin
clrscr;
writeln('Vyberite formulu:');
writeln(' 1) abs(cos(2*x*x*x)+2*sin(x/1.2-3.4))+10.51*cos(abs(3*x))');
writeln(' 2) 18.4*(cos(abs(x)))*sin(x*x-2.5)');
writeln(' 3) ---');
write('Vvedite nomer vybranogo varianta: ');
readln(v);
if v=1 then
begin
clrscr;
write('x=');
readln(x);
writeln(abs(cos(2*x*x*x)+2*sin(x/1.2-3.4))+10.51*cos(abs(3*x)));
readln;
end;
if v=2 then
begin
clrscr;
write('x=');
readln(x);
writeln(18.4*(cos(abs(x)))*sin(x*x-2.5));
readln;
end;
if v=3 then
begin
clrscr;
{...}
end;
end.
А как же быть с последней формулой(ами) ???
__________________
Уважай собеседника, а лучше подари ему +
|
(Offline)
|
|
08.10.2009, 15:36
|
#7
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
А "^" это указатель (Pointer).
|
а, точно))) гг) протупил))
Вот то, что я смог понять с третего:
(и то не знаю правильно ли.. сомнительное обведено)
__________________
Уважай собеседника, а лучше подари ему +
Последний раз редактировалось Trazzy, 16.09.2010 в 03:48.
|
(Offline)
|
|
08.10.2009, 15:38
|
#8
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Ответ: Формулы в ТурбоПаскале
А что такое fi и тем более 6(x)?
|
(Offline)
|
|
08.10.2009, 16:14
|
#9
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
А что такое fi и тем более 6(x)?
|
это наверное не fi, а fi или f1...
...а 6(х) - это 6*х
__________________
Уважай собеседника, а лучше подари ему +
|
(Offline)
|
|
10.10.2009, 07:42
|
#10
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
И тишина..
__________________
Уважай собеседника, а лучше подари ему +
|
(Offline)
|
|
10.10.2009, 08:44
|
#11
|
|
Ответ: Формулы в ТурбоПаскале
мне кажется что это не так, никто не пишет как в посте №7
скорее всего i+5 и i+6 это номер функции
тогда получим что-то типа (свободная нотация ^_^ ) :
Z = E(x=[11,19])(f(16,x)) - 2*P([x=11,16])(f(17,x))
развернув получим :
Z = f(16,11)+f(16,12)+...+f(16,18)+f(16,19) - 2*f(17,11)*f(17,12)*...*f(17,15)*f(17,16)
где первый параметр функции это её номер, а второй это X, теперь непонятно как их посчитать потому что нету самой f, может это первые две, но они не зависят от i
в общем условие неполное
|
|
|
Сообщение было полезно следующим пользователям:
|
|
11.10.2009, 02:14
|
#12
|
Ференька
Регистрация: 26.01.2007
Адрес: улица Пушкина дом Колотушкина
Сообщений: 10,742
Написано 5,461 полезных сообщений (для 15,675 пользователей)
|
Ответ: Формулы в ТурбоПаскале
ArtikZ, задавали именно формулой?
Просто сигма и произведение - явно намёк на циклы
__________________
Мои проекты:
Анальное Рабство
Зелёный Слоник
Дмитрий Маслов*
Различие**
Клюква**
* — в стадии разработки
** — в стадии проектирования
Для проектов в стадии проектирования приведены кодовые имена
|
(Offline)
|
|
11.10.2009, 06:21
|
#13
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
теперь непонятно как их посчитать потому что нету самой f
|
возможно предполагалось что f будет вводиться пользователем в программе..
ArtikZ, задавали именно формулой?
|
я и сам даже не знаю что к чему.. малая небыла тогда в школе, а задание переписала у однокласницы.. и теперь и сам не пойму что да как (т.к. в математике не силен) и еще и других запутал.. ))))
Надо что-нибудь придумывать.. во вторник надо уже сдать.. это ппц!
__________________
Уважай собеседника, а лучше подари ему +
|
(Offline)
|
|
13.10.2009, 02:00
|
#14
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Формулы в ТурбоПаскале
Подсказали такой код. Можно так? (срочняк)
program my;
uses crt;
const i=11;
var a, z, b, d, f: real;
x: integer;
begin
clrscr;
d:=1;
s:=0;
for x:=1 to 19 do
f:=18.4*cos(abs(x))*sin(sqr(x)-2.25);
s:=s+f;
x:=x+1;
a:=s;
for x:=1 to 16 do
f:=abs(cos*2(exp(3)*ln(x)+2*sin(x/1.2-3.4))+10.5*cos*abs(3*x);
d:=d-f;
b:=d;
x:=x+1;
z:=a-2*b;
writeln('z=', z:5:2);
readln;
end.
Поправьте где ошибки..
__________________
Уважай собеседника, а лучше подари ему +
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 00:24.
|