Помощь - Поиск - Пользователи - Календарь
Полная версия: Помогите пожалуйста!
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
поф......
Привет всем. Помогите пожалуйста решить две задачки....совсем не дается этот язык, а сдавать нужно...

3. построить график функции y=sqwrt(x) на отрезке от -2 до 2
Построить координатную сетку и оси
использовать собственные функции для смены системы координат

4. Построить изображение одуванчика
изобразить одуванчик
Количество тычинок сделать равным 22
Сделать рисунок симметричным
renesko1
Построить изображение одуванчика
изобразить одуванчик
Количество тычинок сделать равным 22
Сделать рисунок симметричны
В принципе, берешь круг = 6. 3 радиан ,кажется, делишь его на 22, тем самым определив угол между 2 тычинками(stepAlfa)
и используешь следующий цикл


for i := 1 to 22 do
begin
x := round(x0 + cos ( alfa ) * cer ) ;
y := round(y0 + sin ( alfa ) * cer ) ;
alfa := alfa + stepAlfa ;
line(x0, y0, x, y);
end ;


где Х0 и У0 центр экрана .
Alfa угол который в цикле меняется на "угол между 2 тычинками".
cer рвстояние от центра.
к получившимся точкам сразу же рисуешь линии из центра : line(x0, y0, x, y);

Добавлено через 14 мин.
"использовать собственные функции для смены системы координат"
В смысле ?
renesko1
Если хочешь что б ось симетрии была сторого вертикально то попробуй перед циклом подставлять разные значения alfa.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.