|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.06.2010, 14:00 | #1 |
Пользователь
Регистрация: 26.06.2010
Сообщений: 17
|
процедуры и функции
Уважаемые члены клуба программистов, помогите пожалуйста решить с помощью процедур и функций.
Заранее спасибо! |
29.06.2010, 15:00 | #2 |
ТАМБОВСКИЙ ВОЛК.
Участник клуба
Регистрация: 16.03.2010
Сообщений: 1,354
|
Ну и трудно чтоли функцию сделать?
にんじゃ
|
29.06.2010, 15:54 | #3 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
Если перевод из градусов в радианы (т.е. значение принимаем в радианах) не нужен - выкинуть функцию SinDeg и вместо SinDeg(c) использовать sin(c)
Код:
Изо всей благодати
В руках крепко сжатых Я донесу только капли Последний раз редактировалось Roof; 30.06.2010 в 01:37. |
29.06.2010, 22:52 | #4 |
Пользователь
Регистрация: 26.06.2010
Сообщений: 17
|
Спасибо! в проц и функц-ях я не совсем шарю..
тоесть ф-ция sindeg это перевод в градусы я так понял, а что за ф-ция sin? и GetValue, rad, ResultValue? |
29.06.2010, 22:56 | #5 |
ТАМБОВСКИЙ ВОЛК.
Участник клуба
Регистрация: 16.03.2010
Сообщений: 1,354
|
sin-это синус.А над остальными функциями и процедурами коментарии подписаны.
にんじゃ
|
30.06.2010, 01:04 | #6 |
Пользователь
Регистрация: 26.06.2010
Сообщений: 17
|
result я отнес к real, ибо ругается на него.
программа ошибки пишет, не могу понять что нужно исправить перевод в градусы не нужен все таки.. |
30.06.2010, 01:49 | #7 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
sin - стандартная функция в паскале. Вычисляет синус угла. Значение угла принимается в радианах.
sindeg - это я сам придумал название и написал функцию перевода из градусов в радианы. rad - просто вспомогательная переменная в функции sindeg. GetValue - это я сам написал функцию и придумал ей название, она считает по заданной формуле значение. ResultValue - эту процедуру я написал сам и название ей придумал тоже сам. Считает итоговое значение по твоему заданию. Делал в PascalABC, думал все поймешь . Вот переделал для TurboPascal. Если нужно без перевода из градусов в радианы не нужен, то будет так: Код:
Изо всей благодати
В руках крепко сжатых Я донесу только капли Последний раз редактировалось Roof; 30.06.2010 в 01:55. |
30.06.2010, 19:14 | #8 |
Пользователь
Регистрация: 26.06.2010
Сообщений: 17
|
Спасибо!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
процедуры/функции | vihlyaev | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 07.06.2010 23:43 |
процедуры и функции | barby-Nastya | Помощь студентам | 2 | 25.04.2010 18:46 |
Процедуры и функции | junkie | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 27.04.2009 19:05 |
Процедуры и функции | J0n1cK | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 22.04.2009 16:57 |
Функции и процедуры | _Антон_ | Помощь студентам | 4 | 15.11.2008 19:58 |