Модераторы: volvo877, Snowy, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Задачка по Паскалю 
:(
    Опции темы
l4r4n
Дата 28.10.2010, 05:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 19.10.2010

Репутация: -1
Всего: -1
Всем доброго утра!
Дали решить вот такую вот задачу:
user posted image
Если кто поможет, то заранее благодарен.
PM MAIL   Вверх
~FoX~
Дата 28.10.2010, 09:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 1
Всего: 68
l4r4n, В центр помощи и/или за деньги и не надо пладить кловнов тем!!!


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
l4r4n
Дата 28.10.2010, 09:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 19.10.2010

Репутация: -1
Всего: -1
Лис, а где Центр помощи. Денег не жалко заплатил бы.
Не обяз-но так реагировать.
Я ведь прошу о помощи, для этого наверное и существует такие форумы, как эти.
PM MAIL   Вверх
Фантом
Дата 28.10.2010, 10:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Вы это прекратите!
***


Профиль
Группа: Участник Клуба
Сообщений: 1516
Регистрация: 23.3.2008

Репутация: 2
Всего: 49
Даже для того, чтобы просить о помощи, надо хоть что-нибудь знать. Пока что никто так и не понял, в каком смысле то, что Вы уже второй раз закидываете на форум, является "задачкой по Паскалю". 
PM   Вверх
~FoX~
Дата 28.10.2010, 10:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 1
Всего: 68
l4r4n, http://forum.vingrad.ru/forum/Vingrad-help-center.html
Код

var  a,b,r:real;
begin
  write('a=');
  readln(a);
  write('b=');
  readln(b);
  r := (sin(a+b) - cos(a) * sin(b))/(cos(a-b) - sin(a) * sin(b));
  writeln('Result= ', r:10:5);
end.


Цитата(l4r4n @  28.10.2010,  10:22 Найти цитируемый пост)
Не обяз-но так реагировать.

Зато обязательно читать правила форума!


Это сообщение отредактировал(а) ~FoX~ - 28.10.2010, 10:42


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
l4r4n
Дата 28.10.2010, 12:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 19.10.2010

Репутация: -1
Всего: -1
Гыыы, спс Лис те большое.

Это сообщение отредактировал(а) l4r4n - 28.10.2010, 12:32
PM MAIL   Вверх
l4r4n
Дата 31.10.2010, 15:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 19.10.2010

Репутация: -1
Всего: -1
А вот с этой не поможете?
user posted image
Лис поможешь?
PM MAIL   Вверх
mniip
Дата 31.10.2010, 18:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 29.1.2010

Репутация: нет
Всего: нет
алгебру учить нада!!!

sin(a+b)-cos(a)*sin(b)       sin(a)*cos(b)+cos(a)*sin(b)-cos(a)*sin(b)         sin(a)*cos(b)         sin(a)
----------------------------  =  ------------------------------------------------------  =  -------------------  =  ----------  =  tg(a)
cos(a-b)-sin(a)*sin(b)         cos(a)*cos(b)+sin(a)*sin(b)-sin(a)*sin(b)        cos(a)*cos(b)         cos(a)


Оч просто.
PM MAIL   Вверх
mniip
Дата 31.10.2010, 18:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 29.1.2010

Репутация: нет
Всего: нет
а вот с разорванными кусочными функциями сложнее
PM MAIL   Вверх
~FoX~
Дата 31.10.2010, 21:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 1
Всего: 68
Цитата(l4r4n @  31.10.2010,  16:23 Найти цитируемый пост)
Лис поможешь? 

Конечно!
http://forum.vingrad.ru/forum/Vingrad-help-center.html
ЧИТАЙ ПРАВИЛА ФОРУМА Одна тема - один вопрос  smile  smile  smile Иначе забанят!
Цитата(mniip @  31.10.2010,  19:36 Найти цитируемый пост)
алгебру учить нада!!!

 smile  smile 
Даже не поленился взял листик и вспомнил формулы приведения ))))


Цитата(mniip @  31.10.2010,  19:58 Найти цитируемый пост)
а вот с разорванными кусочными функциями сложнее 

Фигня:
Код

var  x, r:real;
begin
  write('x=');
  readln(x);
  if x >=3 then r := -x + 3*x +9
  else r := x/(x*x*x-1);
  writeln('Result= ', r:10:5);
end.




Это сообщение отредактировал(а) ~FoX~ - 31.10.2010, 21:09


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
l4r4n
Дата 3.11.2010, 05:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 19.10.2010

Репутация: -1
Всего: -1
Алгебру я то знаю. Но все равно спасибо тебе.
PM MAIL   Вверх
l4r4n
Дата 5.11.2010, 14:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 19.10.2010

Репутация: -1
Всего: -1
Лис, помоги мне здесь  smile 
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi"
THandle
Rrader
volvo877

Запрещается!

1. Обсуждать и делится взломанными компонентами или программным обеспечением

2. Публиковать ссылки на варез

3. Оффтопить

  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, THandle, Rrader, volvo877.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Object Pascal: кроссплатформенные технологии | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0857 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.