Консультация онлайн # 161469

Раздел: Pascal / Delphi / Lazarus
Автор вопроса: iren26
Дата: 26.02.2009, 14:05 Консультация неактивна
Поступило ответов: 1
Уважаемые эксперты помогите решить задачи:
1. Составить программу табулирования функции ”Эпициклоида” заданной параметрически:
x = (a + b) . cos (t) – a . cos ((a + b) . t/a),
y = (a + b) . sin (t) – a . sin ((a + b) . t/a),
где: a>0, b>0, t принадлежит промежутку от 0 до [0, 2(число пи)]
на интервале изменения параметра t0<=t<=tk с заданным шагом h. Все необходимые значения (t0, tk, h, A, B) задаются в диалоге с компьютером по желанию пользователя. На экран выводится таблица значений t, x, y на заданном интервале изменения параметра t с заданным шагом. Привести графическую иллюстрацию задачи: построить график заданной функции на заданном интервале с необходимыми комментариями (подписи осей координат, формула графика). Параметры функции подобрать так, чтобы ее график был “фотогеничен”.

2. Написать программу создания/чтения файла, содержащего сведения по теме “Личная видеотека”. Каждая запись файла должна содержать 4-5 полей (названия придумать самостоятельно). Файл должен содержать не менее 8-10 записей.

Ответ # 1, Качурин Влвдимир Константинови (Посетитель)

Здравствуйте, iren26!

1. Предлагаю следующий вариант:
Бросте на форму 5 TEdit ов для ввода параметров, TImage - область рисования и TButton.
Программа содержит функцию прорисовки координатной сетки Axsis(ABmp:TBitMap;XMin,XMax,YMin,YMax:extended),
где XMin=-2*a-b, XMax=2*a+b - область определения эпициклоиды, YMin=-2*a-b, YMax=2*a+b - область значений функции
Код с комментариями в приложении.

2. Описываем тип запись
Type
TMyRecord=record
field1 :byte;
field2 :String[10];
field3 :real;
field4 :word;
end;

и в разделе описания переменных определяем массив типа MyRec:array of TMyRecord;
процедуры чтения - записи в приложении
Удачи!


Приложение:


Качурин Влвдимир Константинови

Посетитель
27.02.2009, 10:51
Нет оценки ответа

Мини-форум консультации # 161469


Нет сообщений в мини-форуме
Возможность оставлять сообщения в мини-форумах консультаций доступна только после входа в систему.
Воспользуйтесь кнопкой входа вверху страницы, если Вы зарегистрированы или пройдите простую процедуру регистрации на Портале.