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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 08.12.2011, 16:04   #1
Павел982
 
Регистрация: 08.12.2011
Сообщений: 6
По умолчанию Задача в паскале (дробь)

Добрый вечер.Прошу помощи с решением задачи.
с=2m-k/m в квадрате - k в квадрате
задачу нужно решить в двух видах: в линейном и разветвляющимся
в линейном получилось, а в разветвляющимся ни как не могу сообразить.
условный оператор IF...Then


Последний раз редактировалось Павел982; 08.12.2011 в 16:22.
Павел982 вне форума Ответить с цитированием
Старый 08.12.2011, 17:05   #2
Павел982
 
Регистрация: 08.12.2011
Сообщений: 6
По умолчанию

Помогите пожалуйста...
Павел982 вне форума Ответить с цитированием
Старый 08.12.2011, 17:09   #3
danekne
Форумчанин
 
Регистрация: 12.02.2007
Сообщений: 360
По умолчанию

Задача линейна) Попробуй в начале вставь if m*m-k*k then writeln("на ноль делить нельзя!") else - решение линейное
danekne вне форума Ответить с цитированием
Старый 08.12.2011, 17:29   #4
Павел982
 
Регистрация: 08.12.2011
Сообщений: 6
По умолчанию


Вот так в линейном виде, а еще нужно в разветвляющемся.2m-k равно нулю или нет.Если равно, то....если не равно, то...
Павел982 вне форума Ответить с цитированием
Старый 08.12.2011, 17:44   #5
danekne
Форумчанин
 
Регистрация: 12.02.2007
Сообщений: 360
По умолчанию

Хорошо. Покажи мне блок схему. Или объясни логически, КАКОЕ ТУТ МОЖЕТ БЫТЬ УСЛОВИЕ????
danekne вне форума Ответить с цитированием
Старый 08.12.2011, 17:53   #6
Павел982
 
Регистрация: 08.12.2011
Сообщений: 6
По умолчанию

Решить задачу, если числитель равен нулю...
На первом курсе колледжа, вот преподаватель четко и ясно сказал-"решить эту формулу двумя способами:
1-линейный (вроде показывал, сказал правильно)
2-разветвляющийся
и как будет выглядеть задача, если числитель равен нулю?"Сижу,читаю лекции...ну не объяснял он нам как делать в разветвляющимся..
Павел982 вне форума Ответить с цитированием
Старый 08.12.2011, 20:40   #7
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

m^2-k^2 != sqrt(m-k)
m^2-k^2 ==sqr(m)-sqr(k);
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"
Mad_Cat вне форума Ответить с цитированием
Старый 09.12.2011, 12:38   #8
danekne
Форумчанин
 
Регистрация: 12.02.2007
Сообщений: 360
По умолчанию

Не ломайте мне мозг Вашей математикой. Если числитель равен нулю, то результат равен нулю, если знаменатель не равен нулю. Если, конечно мы решаем это в теории пределов, тогда, если и числитель и знаменатель равны нулю - получаем неопределенность 0/0
danekne вне форума Ответить с цитированием
Старый 09.12.2011, 14:11   #9
Dvoishnik
Форумчанин
 
Регистрация: 12.02.2011
Сообщений: 808
По умолчанию

Цитата:
Сообщение от Павел982 Посмотреть сообщение
а еще нужно в разветвляющемся.2m-k равно нулю или нет.Если равно, то....если не равно, то...
Код:
if (2m-k)=0 then writeLn('делить на ноль не льзя')
else
Begin
нахождение "С" (у вас есть).
end;
если я вас правельно понял то так)
Терпение!Дежурный экстрасенс скоро свяжется с вами!
Dvoishnik вне форума Ответить с цитированием
Старый 09.12.2011, 14:25   #10
danekne
Форумчанин
 
Регистрация: 12.02.2007
Сообщений: 360
По умолчанию

Код:
if m*m-k*k=0 then writeLn('делить на ноль не льзя')
else
Begin
нахождение "С" (у вас есть).
end;
danekne вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
несократимая дробь druger Помощь студентам 6 02.10.2011 18:53
Может ли PHP вычитать дробь Rost93 PHP 7 07.06.2011 20:05
Несократимая дробь strateg66 Помощь студентам 1 20.12.2009 15:34
Переделать дробь в натуральное число pro100-delphi Паскаль, Turbo Pascal, PascalABC.NET 2 26.09.2009 08:24