Обработка графических и символьных данных на языке Паскаль
Алгоритмы работы программ обработки графических и символьных данных. Основные приемы, методы и принципы работы при решении на ЭВМ задач с использованием языка Паскаль. Процедура рисования графика функции, вывода оцифрованных координатных осей и подписей.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | контрольная работа |
| Язык | русский |
| Дата добавления | 27.01.2013 |
| Размер файла | 13,3 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Размещено на http://www.allbest.ru/
План
Введение
Задание №1 "Обработка символьных данных"
1.1 Обработка текста
1.2 Работа с файлами
Задание №2 "Обработка графических данных"
2.1 Процедура рисования графика функции
2.2 Программа для отображения движения многоугольника
Вывод по курсовой работе
Введение
Целью курсовой работы является углубление и закрепление знаний об основных приемах, методах и принципах работы при решении на ЭВМ задач с использованием языка Паскаль.
Задание №1 "Обработка символьных данных"
1.1 Обработка текста
алгоритм программа графический паскаль
Из двух восьмибуквенных слов образовать последовательность букв, в которой должны чередоваться буквы первого и второго слова.
Выполнение программы:
Program KursObrabotkaTexta;
uses crt;
var
s1,s2:string[8];
i:integer;
begin
clrscr;
writeln('vvedite pervoe slovo:');
readln(s1);
writeln('vvedite vtoroe slovo:');
readln(s2);
writeln('rezultat cheredovaniya:');
for i:=1 to 8 do
write(s1[i],s2[i]);
end.
Проверка выполнения программы:
На экране выходит окно в котором вводим восьмибуквенные слова в данном случае для проверки вводим слова написанные кириллицей: единорог и растение
vvedite pervoe slovo:
единорог
vvedite vtoroe slovo:
растение
rezultat cheredovaniya:
ердаиснтоерноиге
Программа работает без ошибок и чередует слова в правильной последовательности
1.2 Работа с файлами
Дана последовательность, содержащая от 1 до 10 слов, в каждом из которых от 1 до 5 строчных латинских букв; между соседними словами- запятая, за последним словом- точка. Напечатать: все слова, которые встречаются в последовательности по одному разу.
Выполнение программы:
Program KursRabotaSFailami;
uses crt;
var
f,a,s,d:integer;
q:array[1..10] of string;
z:string;
begin
writeln('введите слова');
read(z);
s:=1;
repeat
a:=pos(',',z);
if a<>0 then begin
q[s]:=copy(z,1,a-1);
delete(z,1,a);
s:=s+1;
end;
until a=0;
q[s]:=copy(z,1,length(z)-1);
for d:=1 to s do begin
for a:=1+d to s do if q[d]=q[a] then begin q[a]:='!';f:=1; end;
if f=1 then q[d]:='!';
f:=0;
writeln('слова встречающиеся в последовательности один раз');
end;
for a:=1 to s do if q[a]<>'!' then writeln(q[a]);
end.
Проверка выполнения программы:
Вводим последовательность слов, например такие:
index,index,excel,paint,index,access,access,rybalka,rybalka,index.
Далее выводятся слова встречающиеся в последовательности один раз
excel
paint
после этого делаем вывод что программа работает исправно, т.к. слова введенные по одному разу выводятся на экран правильно.
Задание №2 "Обработка графических данных"
2.1 Процедура рисования графика функции
Написать процедуру рисования графика функции y=x4+x2-8.
Предусмотреть вывод оцифрованных координатных осей соответственно области построения, подписей к графику. Рационально расположить элементы рисунка (график, оси, цифры и штрихи масштабирования, подписи) на экране.
Выполнение программы:
program ObrGrafhGannyh;
uses graph,crt;
const
x1=-6;
x2=6;
var
mx,my,x,dx,y:real;
x0,y0,grD,px,py,grM,i,k:integer;
s,s1:string;
begin
clrscr;
grD:=detect;
initgraph(grD,grM,'');
X0:=getmaxX div 2
Y0:=getmaxY div 2;
mx:=600/(x2-x1);
my:=420/22;
SetBkColor(7);
setlinestyle(0,0,1);
SetColor(1);
line(0,y0,getmaxX,y0);
line(x0,getmaxy,x0,0);
setlinestyle(1,0,0);
Setcolor(9);
for i:=1 to 12 do
begin
line(10,y0-round(i*my),630,y0-round(i*my));
line(10,y0+round(i*my),630,y0+round(i*my));
line(x0+round(i*mx),0,x0+round(i*mx),getmaxY);
line(x0-round(i*mx),0,x0-round(i*mx),getmaxY);
str(i,s);
outtextXY(x0-25,y0-round(i*my),s);
outtextXY(x0-25,y0+round(i*my),'-'+s);
str(i,s);
outtextXY(x0+round(i*mx),y0+10,s);
outtextXY(x0-round(i*mx),y0+10,'-'+s);
end;
outtextXY(x0+5,y0+10,'0');
outtextXY(getmaxX-10,y0-10,'X');
outtextXY(x0-10,10, 'Y');
dx:=0.001;
x:=x1;
while x<=x2 do
begin
px:=x0+round(x*mx);
y:=x*x*x*x+x*x-8;
py:=y0-round(y*my);
putpixel(px,py,4);
x:=x+dx;
end;
setcolor(10);
outtextXY(5,30,'Grafik functii y=x^4+x^2-8');
readln;
end.
Пояснение к программе
Процедура рисования графика функции выполнена, график, оси цифры и штрихи масштабирования, подписи рационально расположены, элементы рисунка выводятся на экран и выводятся оцифрованные координатные оси.
Считаю что по заданию программа выполнена правильна и верно.
2.2 Программа для отображения движения многоугольника
Написать программу для отображения движения многоугольника (плоской фигуры) по экрану по принципу "угол падения равен углу отображения", поверхностями считать границы экрана. Предусмотреть изменения цвета многоугольника (плоской фигуры) при смене направления движения.
Выполнение программы:
program ObrabotaGraphDannyh;
uses graph,crt;
var x,y,x0,y0,d,r,dx,dy,i:integer;
begin
x:=0;
initgraph(x,y,'');
x0:=getmaxX div 2;
y0:=getmaxY div 2;
outtextXY(x0-80,20,'Vyhod - press any key...');
d:=200;
r:=10;
rectangle(x0-d,y0-d,x0+d,y0+d);
x:=x0;
y:=y0-d+r+1;
dx:=-1;
dy:=1;
i:=10;
repeat
setcolor(i);
circle(x,y,r);
setfillstyle(1,i);
fillellipse(x,y,r,r);
delay(10);
setcolor(0);
circle(x,y,r);
setfillstyle(1,0);
fillellipse(x,y,r,r);
x:=x+dx;
y:=y+dy;
if x=x0-d+r+2 then
begin
dx:=1;
i:=i+1;
if i=16 then i:=1;
end
else if y=y0+d-r-2 then
begin
dy:=-1;
i:=i+1;
if i=16 then i:=1;
end
else if x=x0+d-r-2 then
begin
dx:=-1;
i:=i+1;
if i=16 then i:=1;
end
else if y=y0-d+r+2 then
begin
dy:=1;
i:=i+1;
if i=16 then i:=1;
end
until keypressed;
end.
Программа работает исправно, т.к. при движении фигуры её цвет меняется при ударе о поверхность границы экрана.
Вывод по курсовой работе
В курсовой работе были представлены две темы обработка графических и символьных данных. Для выполнения каждой из которых были составлены алгоритмы работы программ. При выполнении программ были использованы некоторые типы данных на паскале, такие как real (переменные вещественного типа), integer (переменные целого типа) и т.д. Паскаль является базовым языком программирования при написания программ.
Размещено на Allbest.ru
...Подобные документы
Изучение основных конструкций и способов написания программ на языке Паскаль. Обзор принципов работы и интерфейса написанной программы. Обработка и модификация двумерных массивов. Файловые структуры данных. Текстовые файлы. Элементы машинной графики.
курсовая работа [761,7 K], добавлен 11.03.2015Изучение символьных и строковых типов данных, алгоритма задачи на языке программирования Паскаль. Описания получения и установки отдельного символа строки, изменения регистра символов. Анализ создания и просмотра файла, поиска и сортировки информации.
курсовая работа [440,7 K], добавлен 13.06.2011Сравнительный анализ языков программирования высокого уровня Си и Паскаль. Реализация алгоритма обработки данных. Тестирование и отладка программы или пакета программ. Структура программы на языке Турбо Паскаль. Указатели и векторные типы данных.
курсовая работа [233,5 K], добавлен 14.12.2012Особенности программирования на языке Паскаль в среде Турбо Паскаль. Линейные алгоритмы, процедуры и функции. Структура данных: массивы, строки, записи. Модульное программирование, прямая и косвенная рекурсия. Бинарный поиск, организация списков.
отчет по практике [913,8 K], добавлен 21.07.2012Рассмотрение правил записи, способов ввода и вывода, использования функций обработки символьных данных в Pascal. Описание алгоритмизации и программирования файловых структур данных, проектирования структуры файла. Ознакомление с работой данных массива.
курсовая работа [336,2 K], добавлен 27.06.2015Основы программирования графики на языке Паскаль. Способы решения графических программ и рекомендации к их решениям. Связь между декартовой и полярной системами координат. Алгоритм переноса объекта. Построение фракталов, классической пыли Кантора.
курсовая работа [3,3 M], добавлен 24.04.2013Основы создания фрактальных композиций при помощи среды программирования Паскаль. Сущность и основа фрактальной графики. Графические возможности и операторы для рисования геометрических фигур в среде Паскаль. Примеры обозначения цветов на языке Паскаль.
лабораторная работа [15,7 K], добавлен 12.06.2010Этапы подготовки и решения задач на компьютере. Способы предоставления алгоритмов. Простые типы данных и их обработка. Основы работы с графикой и графическими операторами в Visual Basic. Организация линейной программы. Процедуры и функции в языке Паскаль.
дипломная работа [1,9 M], добавлен 25.10.2015Изучение истории создания языка Турбо-Паскаль, важнейшего инструмента для обучения методам структурного программирования. Анализ меню управления всеми ресурсами интегрированной инструментальной оболочки, зарезервированных слов, символьных переменных.
презентация [989,7 K], добавлен 06.12.2011Лингвистическая концепция языка Паскаль. Интегрированная инструментальная оболочка. Основы построения программ на ТП 7.0. Алфавит языка и специфика использования символов. Простые типы данных: константы и переменные. Циклические конструкции и операции.
курсовая работа [284,6 K], добавлен 02.07.2011Алгоритмы и алфавит языка Турбо Паскаль. Основные типы данных. Операторы присваивания, перехода и выбора. Понятие массива в Паскале. Особенности работы со строками в программе. Использование линейного поиска и поиска с барьером. Основные виды сортировок.
учебное пособие [53,2 K], добавлен 09.11.2009История и основы структурного программирования в среде Turbo Pascal. Работа с различными типами данных. Операторы языка. Работа с символьными и строковыми переменами, одномерным, двумерным массивами. Классификация компьютерных игр. Игры на языке Паскаль.
курсовая работа [28,8 K], добавлен 06.05.2014Логические конструкции в системе программирования Паскаль. Команды языка программирования, использование функций, процедур. Постановка и решение задач механики в среде системы Паскаль. Задачи статики, кинематики, динамики решаемые с помощью языка Паскаль.
курсовая работа [290,9 K], добавлен 05.12.2008Общая характеристика языков программирования. Описание языка Паскаль: основные субъекты языка; структура Паскаль-программы; типизация и объявление данных. Операторы присваивания и выражения. Структурные операторы, организация ветвлений и циклов.
дипломная работа [276,6 K], добавлен 26.01.2011Совместимость и преобразование типов данных. Создание информационно-поисковой системы на языке программирования Паскаль. Описание интерфейса, каждого блока программы "Картотека больных". Рассмотрение результатов работы программы, сортирования данных.
курсовая работа [368,9 K], добавлен 18.05.2015Структура языка Паскаль, встроенные процедуры и функции. Составление алгоритма решения уравнения, описывающего работу кривошипно-шатунного механизма, с помошью метода итерации, метода Гаусса и метода Зейделя. Блок-схемы алгоритмов и текст программы.
курсовая работа [64,6 K], добавлен 07.05.2011Выбор метода проектирования транслятора с языка Паскаль на язык Си, разработка и кодирование алгоритма программы. Использование допустимых операторов в исходном тексте, определение типов переменных и синтаксиса логических и арифметических выражений.
курсовая работа [1,0 M], добавлен 03.07.2011Программирование на языке Паскаль: алфавит, решение задач, простейшие программы, разветвляющие программы, циклические программы, ввод-вывод, массивы, подпрограммы, строковые данные, записи, файлы, использование библиотеки CRT, графика в Паскале.
учебное пособие [211,1 K], добавлен 30.03.2008Навыки использования теоретического материала и практического опыта для решения задач проектирования и разработки программного обеспечения для систем различного назначения на языке Паскаль. Описание логической структуры, входные и выходные данные.
курсовая работа [647,0 K], добавлен 23.04.2009Паскаль как язык профессионального программирования, который назван в честь французского математика и философа Блеза Паскаля, история его разработки и функциональные особенности. Задача с использованием двумерного массива, составление блок-схемы решения.
контрольная работа [819,0 K], добавлен 12.03.2014
