Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 27.11.2011, 23:04
Edy89 Edy89 вне форума
Прохожий
 
Регистрация: 27.11.2011
Сообщения: 1
Репутация: 10
По умолчанию Создание таблицы и прочее

Здравствуйте.
Прошу помогите мне в решении задачи.

Саму задачу вроде понимаю,но не знаю даже с чего начать.

Описание:
а)
Таблица с 901 значениями косинуса в диапазоне от 0°до 90° (шаг 1/10°) должна служить старому процессору расчитать значения синуса, косинуса и тангенса для диапазона 0°-360° (пошагово 1/10°). Возможно все значения синуса, косинуса от 0°-360° вывести из значений косинуса первого квадранта (0°-90°) для того, что бы сэкономить память процессора, также только эти значения будут использоваться в таблице.
б)
Процедура считывает таблицу с 901 значениями один раз и использует таблицу как Lookup-Таблицу. Это означает, что слабая система значения функций синуса и косинуса не расчитывает, а расчитывать из угла позицию значения в таблице.
Здесь важно определить, в какой зависимости находятся синус и косинус первого квадранта. Обратить внимание на знаки.

Задание:
а)
Создать формуляр на котором находятся Maskedit, три Button1. и три Label. Вышеописанная таблица должна произведена после нажатия Button и сохранена в в текстовом документе как "cos.txt"
б)
Вторая кнопка Button2. считывает документ снова в Array. Третья кнопка Button3. позже вместе с таблицей все переносит на старый процессор.
Для того, что бы не было c больших временных затрат, создайте для планирования таблицу, которая устанавливала бы отношение между синусом и косинусом и их знаками (+ или -) в отношении к значениям косинуса в первом квадранте.

Затем напишите программу так, что бы
1) Maskedit принимает угол (шаг 1/10°) 0<=x<=360
2) Угол пересчитать в rad (1 rad=180/Pi)
3) Число квадранта высчитывается из пограничного угла (с помощью IF)
4) Для квадрантов с помощью "CASE числоквадранта OF" будет расчитан нужный индекс в квадрант1, так же как и знак (integer) для синуса и косинуса.
5) Посредством доступа к Array расчитать значение функции.
6) Выдать значения синуса, косинуса и тангенса (ВНИМАНИЕ! Деление на ноль!!!) в соответствующем Label.
Ответить с цитированием
  #2  
Старый 27.11.2011, 23:10
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Nf tirby lbyjpfdh/ Ds e;t cjdctv j[htytkb&

Где ваш код? Что вы сделали? - Ничего - в раздел =============Работа.
Ответить с цитированием
  #3  
Старый 27.11.2011, 23:33
Аватар для Nikitiy_II
Nikitiy_II Nikitiy_II вне форума
Новичок
 
Регистрация: 01.05.2008
Сообщения: 52
Репутация: 11
По умолчанию

Совсем совесть потеряли - хотят них"№!на не делать, и готовую прогу нахаляву получить.....
Ответить с цитированием
Ответ


Delphi Sources

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

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 03:50.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025