Практическое задание №6
Тема: «Программный принцип работы компьютера. Примеры компьютерных моделей различных процессов. Переход от неформального описания к формальному»
Цель работы: изучить среду программирования и структуру программы Turbo Pascal, научиться составлять несложные программы в этой среде программирования, производить тестирование программы.
Оборудование, приборы, аппаратура, материалы: персональный компьютер, среда программирования Turbo Pascal.
Краткие теоретические сведения к практической работе
Паскаль - язык профессионального программирования, который назван в честь французского математика и философа Блеза Паскаля (1623-1662) и разработан в 1968-1971 гг. Никлаусом Виртом. Первоначально был разработан для обучения, но вскоре стал использоваться для разработки программных средств в профессиональном программировании.
Паскаль популярен среди программистов по следующим причинам:
· Прост для обучения.
· Отражает фундаментальные идеи алгоритмов в легко воспринимаемой форме, что предоставляет программисту средства, помогающие проектировать программы.
· Позволяет четко реализовать идеи структурного программирования и структурной организации данных.
· Использование простых и гибких структур управления: ветвлений, циклов.
· Надежность разрабатываемых программ.
Турбо Паскаль - это система программирования, созданная для повышения качества и скорости разработки программ (80-е гг.). Слово Турбо в названии системы программирования - это отражение торговой марки фирмы-разработчика Borland International (США).
Систему программирования Турбо Паскаль называют интегрированной (integration - объединение отдельных элементов в единое целое) средой программирования, т.к. она включает в себя редактор, компилятор, отладчик, имеет сервисные возможности.
Основные файлы Турбо Паскаля:
· Turbo.exe - исполняемый файл интегрированной среды программирования;
· urbo.hlp - файл, содержащий данные для помощи;
· Turbo.tp - файл конфигурации системы;
· Turbo.tpl - библиотека стандартных модулей, в которых содержатся встроенные процедуры и функции (SYSTEM, CRT, DOS, PRINTER, GRAPH, TURBO3, GRAPH3).
Для запуска интегрированной среды программирования нужно установить текущим каталог с Турбо Паскалем (TP7\BIN) и ввести команду: turbo.exe.
Окно программы содержит полосу меню, область окна и строку статуса.
Для входа в меню можно воспользоваться одним из способ:
· с помощью "мышки";
· с помощью клавиши F10;
· с помощью комбинации Alt+<выделенная буква>. О том, что мы в меню свидетельствует курсор - прямоугольник зеленого цвета.
Интегрированная среда программирования Турбо Паскаль позволяет иметь любое количество открытых окон, но в любой момент времени активным может быть только одно.
Активное окно - это окно с которым вы в настоящий момент работаете.
Общие горячие клавиши:
· F1 - выводит окно подсказки;
· F2 - сохраняет файл активного окна;
· F3 - появление диалогового окна и возможность открыть файл;
· F4 - запускает программу до строки, на которой стоит курсор;
· F5 - масштабирует диалоговое окно;
· F6 - переходит к следующему открытому окну;
· F7 - запускает программу в режиме отладки с заходом внутрь процедур;
· F8 - запускает программу в режиме отладки, минуя вызов процедур;
· F9 - компилирование программы в текущем окне;
· F10 - возвращение в меню.
Команды меню File:
· Open-F3 - открыть существующий файл (при активизации этой опции появляется окно со списком файлов, где можно выбрать необходимый),
· New - создать новый файл (очищает память редактора и переводит в режим создания нового файла, которому присваивается имя Noname.pas; имя можно изменить при записи файла на диск),
· Save-F2 - сохранить файл (переписывает файл из памяти редактора на диск),
· Save as - сохранить с новым именем,
· Save all - сохранить все в окнах (записывает содержимое всех окон редактора в соответствующие файлы),
· Change dir - смена каталога (позволяет изменить установленный по умолчанию диск или каталог),
· Print - печать файла,
· Get info - выдача информации о текущем состоянии программы и используемой памяти,
· DOS Shell - выход в DOS без выгрузки из памяти (для возврата ввести команду exit),
· Exit - выход и выгрузка из памяти.
·
Программы на языке Паскаль имеют блочную структуру:
1. Блок типа PROGRAM - имеет имя, состоящее только из латинских букв и цифр. Его присутствие не обязательно, но рекомендуется записывать для быстрого распознавания нужной программы среди других листингов.
2. Программный блок, состоящий в общем случае из 7 разделов:
3. раздел описания модулей (uses);
o раздел описания меток (label);
o раздел описания констант (const);
o раздел описания типов данных (type);
o раздел описания переменных (var);
o раздел описания процедур и функций;
o раздел описания операторов.
Типы данных:
· INTEGER – целочисленные данные, во внутреннем представлении занимают 2 байта; диапазон возможных значений – от -32768 до +32767; данные представляются точно;
· REAL – вещественные данные, занимают 6 байт; диапазон возможных значений модуля – от 2.9Е-39 до 1.7Е+38; точность представления данных – 11…12 значащих цифр;
· CHAR – символ, занимает 1 байт;
· STRING – строка символов, занимает МАХ+1 байт, где МАХ – максимальное число символов в строке;
· BOOLEAN – логический тип, занимает 1 байт и имеет два значения: FALSE (ложь) и TRUE (истина).ъ
Конечно же, в Турбо Паскале есть все четыре арифметические операции над переменными REAL и INTEGER:
· + – сложение;
· - – вычитание;
· * – умножение;
· / – деление вещественное;
· div – деление целочисленное.
Над данными типа REAL, INTEGER, CHAR, STRING определены следующие операции отношения (сравнения):
· = – равно;
· <> – не равно;
· < – меньше;
· > – больше;
· <= – меньше или равно,
· >= – больше или равно
Cписок математических функций Паскаля:
| ДЕЙСТВИЕ | РЕЗУЛЬТАТ | СМЫСЛ | ||
| Sqr(5) | возведение в квадрат | |||
| Sqrt(25) | корень квадратный | |||
| Pi | 3.1415... | число пи | ||
| Frac(23.192) | 0.192 | дробная часть числа | ||
| Int(3.98) | 3.0 | целая часть числа | ||
| Round(5.8) | округление | |||
| Abs(-20) | абсолютная величина(модуль) числа | |||
| Random | 0.73088 | случайное числоиз диапазона (0 - 1) | ||
| Random (200) | случайное целое число из диапазона (0 - 199) | |||
Общая структура программы на языке Паскаль:
| Рrogram ИМЯ; / /{заголовок программы} Uses...; // {раздел описания модулей} Var..; // {раздел объявления переменных}... Begin // {начало исполнительной части программы}... {последовательность... операторов} End. // {конец программы} |
Пример программы, которая осуществляет сложение двух чисел и выводит сумму на экран:
| Var number1, //{переменная, в которой будет содержаться первое число} number2, //{переменная, в которой будет содержаться второе число} rezult //{переменная, в которой будет содержаться результат}:integer;/ / {указывает тип целых чисел} Begin Write ('Введите первое число '); // {Выводим на экран символы, записанные между апострофами} Readln (number1);// {Введенное пользователем число считываем в переменную number1} Write ('Введите второе число '); // {Выводим на экран символы, записанные между апострофами} Readln (number2); // {Введенное пользователем число считываем в переменную number2} rezult:= number1 + number2; // {Находим сумму введенных чисел и присваиваем переменной rezult} Write ('Сумма чисел ', number1, ' и ', number2, ' равно ', rezult); // {Выводим на экран строчку, содержащую ответ задачи} End. |
Условный оператор
If <условие>
Then <оператор 1 >
Else <оператор 2>;
Если <условие> {Если выполняется условие}
то <действие 1> {то выполнить действие № 1 }
иначе <действие 2> {иначе - выполнить действие № 2 }
Пример. Из двух чисел выбрать наибольшее
Var A,B,C: Real; {A,B - для хранения аргументов, C - результат}
Begin
Writeln ('Введите два числа');
Readln (A,B); {Вводим аргументы с клавиатуры}
If A>B Then C:=A Else C:=B; {Если A>B, то результат - A, иначе результат - B}
Writeln (C); {Выводим результат на экран}
End.
Задание 1. Написать на языке Тurbo Pascal программу для следующей задачи: Ввести три двухзначных числа целого типа. Найти среднее арифметическое этих чисел и вывести его с использованием формата по умолчанию и явно заданного формата.
Var a,b,c:integer;
D:real;
Begin
WriteLn(‘Vvedite a,b,c’);
ReadLn(a,b,c);
d:=(a+b+c)/3;
WriteLn(‘d= ‘,d);
WriteLn(‘d= ‘,d:5:2);
End.
Исходные данные a=______
b=______
c=______
Результат работы программы:_______
Задание 2. Написать на языке Тurbo Pascal программу для следующей задачи: Известны размеры спичечной коробки: высота - 12.41 см., ширина - 8 см., толщина - 5 см. Вычислить площадь основания коробки и ее объем. (Площадь=ширина*толщина, объем=площадь*высота)
Обозначить:
shirina – ширина
tol – толщина
visota – высота
S – площадь
V – объем
Задание 3. Написать на языке Тurbo Pascal программу для следующей задачи: Радиус окружности равен 800. Вычислить длину окружности и площадь круга. Результаты печатать с 5 знаками после десятичной точки. (Длина окружности: 
, площадь круга: 
)
Задание 5. Написать на языке Тurbo Pascal программу для следующей задачи:
Вычислить значения M и X
где 
. Исходные данные A=1, B=2, C=3.
Задание 5. Ответить на вопросы:
1. Что такое среда программирования?
2. Опишите среду программирования Тurbo Pascal.
3. Что такое активное окно?
Задание 6. Сделать вывод по проделанной работе.
Литература
Информатика и ИКТ: учебник для начального и среднего профессионального образования. Цветкова Н.С., Великович Л.С. – Академия, 2011 г.
1. Информатика и ИКТ. Практикум для профессий и специальностей технического и социально-экономического профилей. Н. Е. Астафьева, С. А. Гаврилова, под ред. М.С. Цветковой, Академия, 2012г.
2. Информатика и ИКТ. Базовый уровень: учебник для 10-11 кл. / И.Г.Семакин, Е.К.Хеннер. – 4 изд., испр. – М. – Бином. Лаборатория знаний, 2008г. – 246 с.: ил.
3. Информатика и ИКТ. Базовый уровень: практикум для 10-11 кл. / И.Г.Семакин, Е.К.Хеннер. – 4 изд., испр. – М. – Бином. Лаборатория знаний, 2008г.
4. Информатика и ИКТ. 10 кл. Базовый уровень под ред. Н.В.Макаровой – Спб – Лидер, 2010г.
5. Информатика и ИКТ. 11 кл. Базовый уровень под ред. Н.В.Макаровой – Спб – Лидер, 2010г.
6. Энциклопедия школьной информатики / под ред. И.Г.Семакина. – М.: Бином. Лаборатория знаний, 2011г.
7. http//www.informatika.ru;
8. http//www.student.informatika.ru;
https://mirgeo.ucoz.ru/.