Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

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

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

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 16.02.2009, 15:47   #1
Paul Oakenfold
Пользователь
 
Регистрация: 27.01.2009
Сообщений: 43
Печаль Не сходится с ответом...

http://pic.co.ua/ru/view/01e8f7c415b...5873ff682f552/
Вторая задача...

program pr_123;
var
y,a,c,x,m : real;
flag : boolean;
begin
write ('a= '); readln (a);
write ('c= '); readln (c);
write ('x= '); readln (x);
flag:=false;
if (a>0) or (cos(c)<>0) or (sin(3*x)<>0) then
begin
flag:=true;
m:=4*sqr(cos(5*sqr(sin(x))))*cos(5* sqr(sin(x)))*co s(x)/
(5*sqr(sin(3*x))*sin(3*x))-4*sqrt(a)/(5*sqr(sqr(sin(c)/cos(c)))*
sin(c)/cos(c))
end;

if flag and (m>0) then
y:=3*abs(sqr(a)-5*sqr(sin(sqr(c)))/sqr(cos(sqr(c)))*sin(sqr(c))/cos(sqr(c)))
+sqrt(m);

write ('a c x y'); writeln;
write (a:0:1,' ',c:0:1,' ',x:0:1,' ',y:0:4); writeln;

readln
end.

Где я допустил ошибку? Подскажите пож.
Paul Oakenfold вне форума Ответить с цитированием
Старый 16.02.2009, 15:48   #2
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию

Условие какое?
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Старый 16.02.2009, 15:50   #3
Paul Oakenfold
Пользователь
 
Регистрация: 27.01.2009
Сообщений: 43
По умолчанию

http://pic.co.ua/ru/view/01e8f7c415b...5873ff682f552/
там вторая задачка... на паскале расписать... но ответ для проверки не сошёлся...
Paul Oakenfold вне форума Ответить с цитированием
Старый 16.02.2009, 15:52   #4
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию

Ничего нет. Опишите словами или выложите картинку на форуме.
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Старый 16.02.2009, 15:55   #5
Paul Oakenfold
Пользователь
 
Регистрация: 27.01.2009
Сообщений: 43
По умолчанию

http://s51.radikal.ru/i134/0902/74/96e0a37cbec7.jpg
Эта открылась? вторая задачка...
Paul Oakenfold вне форума Ответить с цитированием
Старый 16.02.2009, 16:06   #6
Paul Oakenfold
Пользователь
 
Регистрация: 27.01.2009
Сообщений: 43
По умолчанию

мб в задаче опечатка?
Paul Oakenfold вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы



Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS
Здесь нужно купить рекламу за 7 тыс руб в месяц! )
пишите сюда - alarforum@yandex.ru
ИКС 840