7 класс Графика на Паскале

Содержание

Слайд 2

Исполнитель Line(x1,y1,x2,y2) от первой точки (x1,y1) – координаты 1 точки до

Исполнитель Line(x1,y1,x2,y2)

от первой точки (x1,y1) – координаты 1 точки до

второй точки (x2,y2) - координаты 2 точки
Секрет успеха – аккуратный и точный рисунок в тетради.
Чем рисунок точнее, тем меньше потери времени на ошибки и их исправление.

Рисует линию
Line(40, 90,70,70)

Слайд 3

Первая программа на Паскале Uses graphABC; Begin Line(40, 90,70,70); Line(70,70,130,170); //

Первая программа на Паскале

Uses graphABC;
Begin
Line(40, 90,70,70);
Line(70,70,130,170);
// далее сообразить самим


End.

Нарисовать в тетради рисунок

Слайд 4

Исполнитель CIRCLE circle(200,200,100); circle(200,200,50); Рисует окружность с центром в точке (x,y) и радиусом R circle(x,y,R);

Исполнитель CIRCLE

circle(200,200,100);
circle(200,200,50);

Рисует окружность с центром в точке (x,y) и радиусом R

circle(x,y,R);

Слайд 5

Исполнитель ELLIPSE ellipse(x1,y1,x2,y2); Рисует эллипс по двум противоположным точкам (40,90) (140,50)

Исполнитель ELLIPSE

ellipse(x1,y1,x2,y2);

Рисует эллипс по двум противоположным точкам

(40,90)

(140,50)

Слайд 6

Исполнитель ARC arc(x,y,R,yгол1,угол2); Рисует дугу из точки x,y радиусом R, начиная

Исполнитель ARC

arc(x,y,R,yгол1,угол2);

Рисует дугу из точки x,y радиусом R, начиная с угла1

до угла 2.

Углы растут против
часовой стрелки

угол1 < угла2!

Слайд 7

Шахматная доска Нарисовать на экране. Дописать верхнее и правое поля. К

Шахматная доска

Нарисовать на экране.
Дописать верхнее и правое поля. К сожалению,

повернуть букву нельзя.
Поэтому пусть будет прямая, а не обратная.
Слайд 8

1. Роботы Покрасить Домашнее задание Ключи

1. Роботы

Покрасить
Домашнее задание Ключи

Слайд 9

2. Ключ покрасить

2. Ключ

покрасить

Слайд 10

3. Елочки

3. Елочки

Слайд 11

Слайд 12

Чебурашка

Чебурашка

Слайд 13

Зачетный проект Якутский узор по своему усмотрению. Чебурашка и маленькие его братья 5 смайликов

Зачетный проект

Якутский узор по своему усмотрению.
Чебурашка и маленькие его братья
5 смайликов

Слайд 14

Циклы в графике Var x,y: integer; Begin x:=20; y:=20;

Циклы в графике

Var x,y: integer;
Begin
x:=20; y:=20;