- •Для школьников,
- •Студентов
- •И начинающих
- •Часть I. Необходимые сведения о компьютере и программе 8
- •Глава 0. Первое представление о компьютере и программе 9
- •Глава 1. Программа и программирование 12
- •Глава 2. Устройство и работа компьютера 21
- •Часть II. Программирование на Паскале – первый уровень 29
- •Глава 0. Простые (линейные) программы. Операторы ввода-вывода. Переменные величины 30
- •Часть III. Программирование на Паскале – второй уровень 101
- •Глава 0. Алфавит и ключевые слова Паскаля 102
- •Глава 1. Работа с разными типами данных Паскаля 104
- •Глава 2. Процедуры и функции с параметрами 123
- •Глава 3. Строгости Паскаля 133
- •Глава 4. Другие возможности Паскаля 145
- •Часть IV. Работа в Паскале на компьютере 157
- •От автора
- •Предисловие
- •0.1.Кому нужна эта книга?
- •0.2.Почему Паскаль?
- •0.3.Какой из Паскалей?
- •0.4.Краткое содержание с рекомендациями
- •Часть III. Программирование на Паскале – второй уровень. Цели этой части:
- •Часть I. Необходимые сведения о компьютере и программе
- •Глава 0.Первое представление о компьютере и программе
- •0.1.Что умеет делать компьютер
- •0.2.Что такое компьютер. Первое представление о программе.
- •0.3.Как человек общается с компьютером
- •Глава 1.Программа и программирование
- •1.1.Список команд. Командный и программный режимы
- •Последовательность работы человека с роботом
- •1.2.Что важно знать о программе
- •1.3.Понятие о процедуре. Может ли робот поумнеть?
- •1.4.Программа для компьютера на машинном языке
- •1.5.Языки программирования
- •1.6.Пример настоящей программы для компьютера на языке Лого
- •1.7.Последовательность работы программиста на компьютере
- •1.8.Основные приемы программирования
- •Глава 2.Устройство и работа компьютера
- •2.1.Как устроен и работает компьютер
- •2.1.1.Порядок обмена информацией между устройствами компьютера
- •2.2.Устройство и размеры оперативной памяти
- •2.3.Взаимодействие программ в памяти
- •2.4.Внешние устройства компьютера
- •2.4.1.Устройства ввода
- •Устройства вывода
- •Внешняя память
- •2.5.Кодирование информации в компьютере
- •Часть II. Программирование на Паскале – первый уровень
- •Глава 0.Простые (линейные) программы. Операторы ввода-вывода. Переменные величины
- •0.1.Процедура вывода Write
- •8 'Котят' 3*3 'щенят'
- •0.2.Первая программа на Паскале
- •Точкой с запятой необходимо отделять операторы друг от друга. Служебные слова begin и end от операторов точкой с запятой отделять не нужно.
- •0.3.Выполняем первую программу на компьютере
- •0.4.Процедура вывода WriteLn. Курсор
- •0.5.Переменные величины. Оператор присваивания
- •0.6.Описания переменных (var)
- •0.7.Что делает оператор присваивания с памятью
- •0.7.1.Оператор присваивания меняет значение переменной величины
- •0.8.Имена переменных
- •0.9.Математика. Запись арифметических выражений
- •0.10.Вещественные числа в Паскале
- •Три совета
- •0.11.Порядок составления простой программы Задача:
- •Порядок составления программы:
- •5. Теперь нужно задать компьютеру действия, которые нужно проделать с исходными данными, чтобы получить результат.
- •0.12.Операторы ввода данных ReadLn и Read.
- •0.13.Интерфейс пользователя
- •0.14.Строковые переменные
- •0.15.Диалог с компьютером
- •0.16.Константы
- •Глава 1.Разветвляющиеся программы
- •1.1.Условный оператор if или как компьютер делает выбор
- •1.2.Правила записи оператора if
- •1.3.Составной оператор
- •1.4.Ступенчатая запись программы
- •1.5.Вложенные операторы if. Сложное условие в операторе if. Логические операции
- •1.6.Символьный тип данных Char
- •1.7.Оператор варианта case
- •Глава 2.Циклические программы
- •2.1.Оператор перехода goto. Цикл. Метки
- •2.2.Выход из цикла с помощью if
- •2.3.Оператор цикла repeat
- •2.4.Оператор цикла while
- •2.5.Отличия операторов repeat и while
- •2.6.Оператор цикла for
- •Глава 3.Типичные маленькие программы
- •3.1.Вычислительная циклическая программа
- •3.2.Роль ошибок
- •3.3.Счетчики
- •3.4.Сумматоры
- •3.5.Вложение циклов в разветвления и наоборот
- •3.6.Вложенные циклы
- •3.7.Поиск максимального из чисел
- •Глава 4.Процедуры
- •4.1.Компьютер звучит
- •4.2.Простейшие процедуры
- •Программа 1
- •Программа 2
- •Программа 3
- •4.3.Процедуры и операторы
- •4.4.Стандартные процедуры Halt и Exit
- •Глава 5.Графика
- •5.1.Стандартные модули
- •5.2.Стандартный модуль Graph, текстовый и графический режимы
- •5.2.1.Текстовый и графический режимы
- •5.2.2.Переключение между текстовым и графическим режимами
- •5.3.Рисуем простейшие фигуры
- •5.4.Работа с цветом. Заливка. Стиль линий и заливки
- •5.5.Используем в рисовании переменные величины
- •5.6.Использование случайных величин при рисовании
- •5.7.Движение картинок по экрану
- •Глава 6.Создаем первую большую программу
- •6.1.Постановка задачи
- •6.2.Программирование по методу “сверху-вниз”
- •6.3.Сначала – работа над структурой программы
- •6.4.Зачем переменные вместо чисел
- •6.5.Записываем программу целиком
- •6.6.Порядок описания переменных, процедур и других конструкций Паскаля
- •6.7.Управление компьютером с клавиатуры. Функции ReadKey и KeyPressed
- •6.8.Буфер клавиатуры
- •6.9.Гетерархия. Задание на игру “Торпедная атака”
- •Часть III. Программирование на Паскале – второй уровень
- •Глава 0.Алфавит и ключевые слова Паскаля
- •0.1.Алфавит
- •0.2.Ключевые слова
- •0.3.Использование пробела
- •Глава 1.Работа с разными типами данных Паскаля
- •1.1.Список типов
- •Комментарии к списку типов
- •1.2.Числовые типы
- •1.3.Массивы
- •1.3.1.Переменные с индексами
- •1.3.2.Одномерные массивы
- •1.3.3.Двумерные массивы
- •1.3.4.Какие бывают массивы
- •1.4.Определения констант
- •1.5.Типизированные константы
- •1.6.Придумываем типы данных
- •1.7.Логический тип Boolean
- •1.8.Перечислимые типы
- •1.9.Ограниченный тип (диапазон)
- •1.10.Действия над порядковыми типами
- •1.11.Символьный тип Char. Работа с символами
- •1.12.Строковый тип String. Работа со строками
- •1.13.Записи
- •1.14.Множества
- •1.15.Расположение информации в оперативной памяти. Адреса
- •1.16.Ссылки
- •Глава 2.Процедуры и функции с параметрами
- •2.1.Процедуры с параметрами
- •2.2.Функции
- •2.3.Подпрограммы. Локальные и глобальные переменные
- •2.4.Массивы как параметры
- •2.5.Параметры-значения и параметры-переменные
- •2.6.Индукция. Рекурсия. Стек
- •2.7.Сортировка
- •Глава 3.Строгости Паскаля
- •3.1.Структура программы
- •3.2.Структура процедур и функций
- •3.3.Выражения
- •3.4.Совместимость типов
- •3.5.Форматы вывода данных
- •3.6.Переполнение ячеек памяти
- •3.7.Дерево типов
- •3.8.Синтаксисические диаграммы Паскаля
- •Глава 4.Другие возможности Паскаля
- •4.1.Работа с файлами данных
- •4.2.Вставка в программу фрагментов из других программных файлов
- •4.3.Модули программиста
- •4.4.Дополнительные процедуры и функции модуля Graph
- •4.5.Копирование и движение областей экрана
- •4.6.Вывод текста в графическом режиме
- •4.7.Управление цветом в текстовом режиме (модуль crt)
- •4.8.Работа с датами и временем (модуль dos)
- •4.9.Нерассмотренные возможности Паскаля
- •4.10.Миг между прошлым и будущим
- •Часть IV. Работа в Паскале на компьютере
- •Что нужно знать и уметь к моменту выполнения первой программы?
- •Порядок работы в Паскале
- •(1) Запуск Паскаля
- •(2) Начало работы. Ввод программы. Выход из Паскаля
- •(3) Сохранение программы на диске. Загрузка программы с диска
- •(4) Выполнение программы
- •(5) Исправление ошибок. Отладка программы.
- •Пошаговый режим
- •Работа с окнами пользователя и отладчика
- •Отладка больших программ
- •Работа с несколькими окнами.
- •Копирование и перемещение фрагментов текста
- •Обзор популярных команд меню
- •Создание исполнимых файлов (exe)
- •Приложения. Справочный материал п1. Как вводить программу в компьютер или работа с текстом в текстовом редакторе
- •Работа с одной строкой текста
- •Работа с несколькими строками
- •Собственно работа с несколькими строками.
- •П2. Файловая система магнитного диска
- •Имена файлов и каталогов
- •Пример структуры каталогов на диске
- •0.1.1.Логические диски. Путь (дорожка) к файлу
- •П3. Список некоторых операций, процедур и функций Паскаля
- •Математика
- •Модуль crt
- •Модуль Graph
- •П4. Произношение английских слов
- •П5. Решения заданий
- •П6. Список литературы
- •П7. Предметный указатель
0.15.Диалог с компьютером
Напишем программу, которая осуществляла бы такой диалог человека с компьютером:
КОМПЬЮТЕР ВЫВОДИТ НА ЭКРАН: Здравствуй, я компьютер, а тебя как зовут?
ЧЕЛОВЕК ВВОДИТ С КЛАВИАТУРЫ: Коля
КОМПЬЮТЕР ВЫВОДИТ НА ЭКРАН: Очень приятно, Коля. .Сколько тебе лет?
ЧЕЛОВЕК ВВОДИТ С КЛАВИАТУРЫ: 16
КОМПЬЮТЕР ВЫВОДИТ НА ЭКРАН: Ого!Целых 16 лет!Ты уже совсем взрослый!
Вот программа:
VAR imya :String; vozrast :Integer; BEGIN WriteLn ('Здравствуй, я компьютер, а тебя как зовут?'); ReadLn (imya); WriteLn ('Очень приятно, ', imya, ' . Сколько тебе лет?'); ReadLn (vozrast); WriteLn ('Ого! Целых ' ,vozrast, ' лет! Ты уже совсем взрослый!') END.
Диалог будет отличаться только той информацией, которую вводит человек. Так, в другой раз по этой же программе будет осуществлен следующий диалог:
КОМПЬЮТЕР: Здравствуй, я компьютер, а тебя как зовут? ЧЕЛОВЕК : Фантомас! КОМПЬЮТЕР: Очень приятно, Фантомас! . Сколько тебе лет? ЧЕЛОВЕК: 100 КОМПЬЮТЕР: Ого! Целых 100 лет! Ты уже совсем взрослый!
Не подумайте, что эта программа очень умная. Она совершенно не анализирует, какую информацию человек ввел с клавиатуры. Поэтому с ней возможен и такой диалог:
КОМПЬЮТЕР: Здравствуй, я компьютер, а тебя как зовут? ЧЕЛОВЕК: Сгинь с моих глаз! КОМПЬЮТЕР: Очень приятно, Сгинь с моих глаз! . Сколько тебе лет? ЧЕЛОВЕК: -2 КОМПЬЮТЕР: Ого! Целых -2 лет! Ты уже совсем взрослый!
Задание 17: Напишите программу для следующей задачи: Компьютер спрашивает названия двух планет, радиусы их орбит (в миллионах километров) и скорости движения по орбите (в миллионах километров в сутки). Компьютер вычисляет продолжительность года на планетах и выдает результат в таком виде: Продолжительность года на планете Земля – 365 суток, а на планете Эоэлла – 12 суток.
0.16.Константы
Кроме переменных величин в тексте программы мы встречаем константы. Это те значения, которые или присванваются переменным, или встречаются в выражениях, или сравниваются с выражениями. Например:
x:=25 здесь числовая константа - 25
slovo:=’Волга’ здесь строковая константа - Волга
simvol:=’!’ здесь символьная константа - !
y:=(x+1) / (200*x - 0.3) здесь числовые константы - 1 и 200 и 0.3
Глава 1.Разветвляющиеся программы
1.1.Условный оператор if или как компьютер делает выбор
Идею разветвления в программе я изложил в 1.8. Сейчас добавлю только, что вся мыслительная деятельность во всех программах (в том числе и той, что выиграла в шахматы у Каспарова) осуществляется только при помощи ветвления (выбора).
Теперь посмотрим, как писать разветвляющиеся программы на Паскале.
Выучим сначала три английских слова:
if |
читается "иф" |
переводится "если" |
then |
читается "зэн" |
переводится "то" |
else |
читается "элз" |
переводится "иначе" |
Теперь приведем пример нового для вас оператора:
IF a=28 THEN WriteLn (f) ELSE k:=44
Переводится он так:
ЕСЛИ a=28 ТО печатай f ИНАЧЕ присвой переменной k значение 44.
Другими словами, мы предлагаем компьютеру сначала подумать, правда ли, что a=28 , и если правда, то выполнить оператор WriteLn (f), в противном случае выполнить оператор k:=44 . Таким образом, мы с вами впервые написали оператор, при выполнении которого компьютер не просто выполняет, что приказано, а сначала думает и делает выбор (пока одного из двух).
Мы видим, что оператор if включает в себя другие операторы, которые выполняются или не выполняются в зависимости от какого-то условия. Чтобы понять, зачем может пригодиться оператор if, рассмотрим следующую задачу.
Задача 1. Компьютер должен перемножить два числа - 167 и 121. Если их произведение превышает 2000, то компьютер должен напечатать текст ПРОИЗВЕДЕНИЕ БОЛЬШОЕ, иначе текст ПРОИЗВЕДЕНИЕ МАЛЕНЬКОЕ. После этого компьютер в любом случае должен напечатать само произведение.
Программа:
VAR a,b,y :Integer;
BEGIN a:=167;
b:=121;
y:=a*b;
if y>20000 then WriteLn ('ПРОИЗВЕДЕНИЕ БОЛЬШОЕ')
else WriteLn ('ПРОИЗВЕДЕНИЕ МАЛЕНЬКОЕ');
WriteLn (y)
END.
Пояснение: В программе 5 операторов, последний – WriteLn (y). Поскольку эти 5 операторов выполняются по порядку, то он выполнится обязательно.
Задача 2. В компьютер вводятся два произвольных положительных числа - длины сторон двух кубиков. Компьютер должен подсчитать объем одного кубика - большего по размеру .
Обозначим a1 - сторону одного кубика, a2 - сторону другого, bol - сторону большего кубика, V - объем кубика. Приведем три варианта программы:
ВАРИАНТ 1
|
VAR a1,a2 : Real; BEGIN ReadLn (a1,a2); if a1>a2 then WriteLn (a1*a1*a1 : 15:5) else WriteLn (a2*a2*a2 : 15:5) END. |
ВАРИАНТ 2
|
VAR a1,a2,V : Real; BEGIN ReadLn (a1,a2); if a1>a2 then V:=a1*a1*a1 else V:=a2*a2*a2; WriteLn (V : 15:5) END. |
ВАРИАНТ 3
|
VAR a1,a2,bol,V : Real; BEGIN ReadLn (a1,a2); if a1>a2 then bol:=a1 else bol:=a2; V:=bol*bol*bol; WriteLn (V : 15:5) END. |
Поясним последний вариант. Программа состоит из четырех операторов, которые выполняются в порядке записи. Первым после запуска выполняется оператор ReadLn (a1,a2), который ждет от нас ввода двух чисел. Пусть мы сегодня ввели числа 3 и 2. Компьютер понимает, что a1 равно 3, a2 равно 2, и переходит к выполнению оператора if. Он видит, что 3>2, и поэтому выполняет оператор bol:=a1, а оператор bol:=a2 не выполняет. В результате в ячейке bol оказывается число 3. Затем компьютер переходит к следующему оператору - V:=bol*bol*bol и вычисляет V=3*3*3=27. Следующий оператор WriteLn (V : 15:5) печатает число 27.00000 .
Если завтра мы запустим эту же программу и введем числа 6 и 10, то компьютер увидит, что утверждение 6>10 ложно, и поэтому выполнит оператор bol:=a2, а оператор bol:=a1 выполнять не станет. В результате в ячейке bol окажется число 10 и будет напечатано число 1000.00000 .
А теперь, дорогой читатель, вам пришла пора освоить пошаговый режим выполнения программы на компьютере. В обычном режиме компьютер выполняет программу настолько быстро, что вы не успеваете заметить, в каком порядке он выполняет отдельные операторы программы, а без этого часто невозможно понять ее логику. Пошаговый режим заставляет компьютер при выполнении программы задерживаться на каждой строке программы столько, сколько нужно человеку. Сейчас вам необходимо проделать то, что сказано в части IV в пункте «Пошаговый режим» параграфа «Исправление ошибок. Отладка программы».
Итак, если паровая машина избавила человека от тяжелого физического труда, то оператор if избавил человека от тяжелого умственного труда, в нашем случае - от необходимости решать, какое из двух чисел больше другого.
Оператор if можно записывать и без части else. Например, if s<t then w:=a+1. Это означает, что если s<t, то нужно выполнить оператор w:=a+1, в противном случае ничего не делать, а просто перейти к следующему оператору.
Для примера рассмотрим простейшую задачу: В компьютер вводится слово. Компьютер должен просто распечатать его. Однако, если введенным словом будет "колхозник", то компьютер должен напечатать вместо него слово "фермер".
Вот как будет выглядеть наша программа-"цензор":
VAR Slovo : String; BEGIN ReadLn (Slovo); { переменная Slovo будет иметь значением строку символов, введенных с клавиатуры } if Slovo = 'колхозник' then Slovo := 'фермер'; WriteLn (Slovo) END.