Упражнения
Что будет выведено на экран в результате выполнения следующей программы:
Program z1;
Begin
Writeln ( ‘Привет, это я, умный компьютер!’);
Writeln (‘Я знаю, что 6*5=’, 6*5);
End.
Составить программу вычисления суммы трех данных целых чисел.
Вычислить значение выражения а2-2а, где а –целое число.
Вычислить значение выражения (а2+b)*a/b, где а и b –целые числа.
Дано целое число. Модуль этого числа увеличить в 5 раз.
Даны два целых числа х и у. Вывести на экран монитора остаток от деления числа х на число у.
Дано целое число. Уменьшить его в 10 раз и вывести на экран компьютера частное от деления нацело.
Дано вещественное число Х. Напишите программу выделения целой части данного числа.
Дано двузначное число. Напишите программу, которая выводит на экран монитора количество десятков в нем.
Какое расстояние прошел автомобиль за время t , если двигался он со скоростью V км/час?
Дан рост трех друзей. Напишите программу, которая определяет их средний рост.
С помощью команды Writeln и символов клавиатуры нарисовать на экране монитора следующие картинки:
Х ххх хххххх ххххххххх хххххххххххх хх хх |
-------------- | | | ~ ~ | | ? | | <> | ------------- | |
|
§6. Использование графических возможностей языка программирования (точка, отрезок, окружность, прямоугольник).
Вы научились составлять программы, с помощью которых компьютер пишет на экране монитора, отвечает на вопросы, считает, решает математические задачи. Ранее вы выводили на экран картинки, состоящие из символов клавиатуры, но это изображение не являлось графическим. Изображения из символов называют псевдографикой. В этом случае монитор работает в текстовом режиме: 80х25 символов на экране. В этом параграфе познакомимся с возможностями среды языка программирования Pascal ABC для работы с графической информацией.
6.1 Графический режим работы.
При работе в графическом режиме изображение на экране строится не из символов, а из точек – пикселов. Каждый пиксель (точка) имеет две координаты: х и у (рис.3.4).
Геометрические размеры пикселя определяются разрешением монитора. Разрешение монитора задается в виде x x y, где x – количество возможных пикселов на экране по горизонтали, а y – количество пикселов по вертикали. Например, известны следующие разрешения мониторов:
320х200;
640x480;
800x600;
1024x768;
1280x1024 – и т.д.
Даже при самом плохом разрешении экрана изображение в графическом режиме формируется с помощью 64000 графических элементов. Из такого количества «строительных кирпичиков» можно построить хорошую картинку. О том, как это делается с помощью Pascal ABC, мы сейчас и поговорим.
5.2 Возможности стандартной графической библиотеки.
Любая графическая картинка формируется из простых геометрических фигур. Это точки, отрезки (линии), прямоугольники, окружности и т.д. Из геометрии известно, что положение геометрического объекта и его форма задаются координатами его точек. Для того чтобы запрограммировать вывод картинки, надо научиться задавать координаты геометрических фигур, из которых она состоит.
Графические координаты задают положение точки на экране монитора. Поскольку минимальным элементом, к которому имеет доступ программист, является пиксель, в качестве графических координат используют порядковые номера пикселов. Началом отсчета является левый верхний угол экрана. Значения х – координаты отсчитывается слева направо, а значения у – координаты – сверху вниз (рис. 3.4). Например, координаты точки (20, 50) означают, что от левого верхнего угла экрана надо отсчитать 20 пикселов по горизонтали вправо и 50 пикселов по вертикали вниз.
Важно помнить:
1. Графические координаты принимают только целочисленные значения.
2. Графические координаты принимают значения, ограниченные как снизу (нулевым значением), так и сверху (значением разрешения экрана монитора).
3. Графическая координата у отсчитывается сверху вниз.
Рисование различных геометрических фигур осуществляется с помощью специальных стандартных команд (процедур). Команды для работы в графическом режиме хранятся в библиотечном модуле GraphAbc. Модуль GraphAbc представляет собой простую графическую библиотеку и предназначен для создания графических программ. Поэтому во всех программах, которые работают в графическом режиме, ее необходимо подключать в разделе описаний с помощью зарезервированного слова Uses (подключить). Рисование осуществляется в специальном графическом окне. Возможность рисовать одновременно в нескольких окнах отсутствует. Рисовать можно с помощью пера и кисти. В модуле GraphAbc с помощью команды setwindowsize(X,Y) можно задавать размеры графического окна. По умолчанию графическое окно будет принимать размеры экрана компьютера. Изучать графические возможности языка Паскаль мы будем на конкретных примерах. Нашей первой программой будет программа, которая выведет на экран монитора c помощью команды setpixel точку черным цветом пера.
Пример 1. Демонстрация подключения модуля GraphAbc
program tochka;
uses graphabc; {подключение модуля GraphAbc}
begin
setwindowsize(640,480); {устанавливает размеры
графического окна}
setpixel(100,120,clBlack); {устанавливает черный цвет
пера и рисует точку с координатами (100,120)}
end.
В данном примере мы познакомились с использованием команды setpixel в частном случае. В общем виде эта команда выглядит так:
setpixel(x,y,c) – рисует пиксел (точку) с координатами (х,у) цветом с. Стандартные цвета с задаются символическими константами:
clBlack – черный clPurple – фиолетовый clWhite – белый clMaroon – темно-красный clRed – красный clNavy – темно-синий clGreen – зеленый clBrown – коричневый clBlue – синий clSkyBlue – голубой clYellow – желтый clCream – кремовый |
|
clAqua – бирюзовый clOlive – оливковый clFuchsia – сиреневый clTeal – сине-зеленый clGray – темно-серый clLime – ярко-зеленый clMoneyGreen – цвет зеленых денег clLtGray – светло-серый clDkGray – темно-серый clMedGray – серый clSilver – серебряный |