Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.12.2011, 22:15   #1
Glum
Пользователь
 
Регистрация: 19.12.2011
Сообщений: 14
Вопрос Задача в паскале!

задача в паскале!

Дано a и b. Найти Q=F(0.9,b)+f(a,b)+f(a-b,a+b), где f(x,y)=(x*x+x*y+y*y)/(1+x*x+y*y). Вычисление функции f(x,y) оформить в виде подпрограммы функции.
помогите срочно!
Glum вне форума Ответить с цитированием
Старый 19.12.2011, 22:19   #2
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

Цитата:
помогите срочно!
Код:
function f(x,y:real):real;
begin
f:=(x*x+x*y+y*y)/(1+x*x+y*y);
end;
var a,b:real;
begin
write('a=');readln(a);
write('b=');readln(b);
Writeln('Q= ',(f(0.9,b)+f(a,b)+f(a-b,a+b)):6:2);
end.
из-за 1$ ведутся Жмоты(
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"

Последний раз редактировалось Mad_Cat; 19.12.2011 в 22:22.
Mad_Cat вне форума Ответить с цитированием
Старый 19.12.2011, 22:20   #3
Glum
Пользователь
 
Регистрация: 19.12.2011
Сообщений: 14
По умолчанию

Спасибо)..

Последний раз редактировалось Glum; 19.12.2011 в 22:25.
Glum вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
задача в Паскале Л@пуля Помощь студентам 3 01.12.2011 07:42
ЗАДАЧА НА ПАСКАЛЕ. ddeman666 Помощь студентам 2 01.11.2010 13:29
Задача на паскале Zeir Помощь студентам 5 08.10.2010 22:34
задача в паскале... Вера123 Помощь студентам 1 12.06.2009 19:30