Николаус Вирт Но думать, что Паскаль - язык исключительно для обучения, было бы неверно. Вот что говорил об этом Н. Вирт (1984 г.): « Утверждалось, что Паскаль был разработан в качестве языка для обучения. Хотя это утверждение справедливо, но его использование при обучении не являлось единственной целью. На самом деле я не верю в успешность применения во время обучения таких инструментов и методик, которые нельзя использовать при решении каких - то практических задач ». * *
Язык программирования Pascal С тех пор Паскаль становился всё более и более популярным, причем не только, как язык для обучения принципам программирования, но и как средство создания достаточно сложного программного обеспечения. В своем первоначальном виде Паскаль имел довольно ограниченные возможности, но расширенный вариант этого языка – Turbo Pascal является мощным языком программирования.
Почему PASCAL? Язык программирования Pascal был назван в честь французского учёного Блеза Паскаля, который еще в 1642 г. изобрел первую механическую счётную машину. Она представляла собой систему взаимодействующих зубчатых колёсиков, каждое из которых соответствовало одному разряду десятичного числа и содержало цифры от 0 до 9. Когда колёсико совершало полный оборот, следующее сдвигалось на одну цифру. Машина Паскаля была суммирующей машиной.
Основные сведения о языках программирования Язык – система знаков. Язык ЭВМ (машинный язык) – двоичная знаковая система. Поэтому, чтобы компьютер мог понять написанную программу, она должна быть переведена на язык, понятный компьютеру. Этот процесс перевода называется трансляцией.
Интегрированная среда Turbo Pascal-7.0 Огромную роль в массовом распространении Паскаля сыграла компания Borland International. Она сумела создать знаменитую Turbo- среду разработки. Это был огромный шаг вперед в облегчении процесса программирования. Почему Turbo? Turbo в переводе с английского сленга означает ускорение. Компилятор, входящий в состав Turbo Pascal очень быстро переводит программу с языка программирования в машинные коды.
Основные средства языка Символы языка - это элементарные знаки, используемые при составлении текстов. Алфавит языка - набор таких символов. Алфавит языка Turbo Pascal 7.0 включает: все латинские прописные и строчные буквы арабские цифры (0 – 9) символы + - * / =,. ; : _ () { } и др. служебные (зарезервированные) слова
Для записи команд, имен функций, поясняющих терминов Turbo Pascal 7.0 существует набор строго определенных слов, которые называются служебными или зарезервированными (это английские мнемонические сокращения). Служебные слова делятся на три группы: операторы (READ, WRITELN и др.) имена функций (SIN, COS и др.) ключевые слова (VAR, BEGIN, END и др.) Основные средства языка
Именем величины называется её обозначение, это слово из букв, цифр и знаков подчёркивания, начинающееся с буквы. Числа: целые, вещественные: с фиксированной точкой (-1.23; 654.2), с плавающей точкой (2, 437,). Шесть операций: + сложение, - вычитание, / деление, * умножение, mod нахождение остатка, div деление нацело.
Арифметическое выражение конструируется из имён, чисел, знаков арифметических действий, математических функций. Для указания порядка действий используются только круглые скобки. Для возведения в квадрат используется обозначение sqr(х). Для извлечения квадратного корня используется обозначение sqrt(х). Модуль обозначается abs(х).
Оператор присваивания Имя переменной:= арифметическое выражение. х:= 3.24 или х:= х+4. Тип переменной 1.Если переменная слева вещественного типа, то арифметическое выражение может быть как целого, так и вещественного типа. 2.Если переменная слева целого типа, то арифметическое выражение только целочисленное.
Структура программы в Паскале 1 часть – описание данных и операторов. 2 часть – программный блок. Общий вид программы: Program (имя программы) label (список меток) const (список постоянных значений) type (описания сложных типов данных) var (описания данных программы) begin (начало программного блока) (алгоритм) end. (конец программы)
Имя программы: не более 8 знаков, начинается с буквы. end c точкой. Описательная часть состоит из 4 разделов: меток, констант, имён и типов переменных. var имя и тип переменной: integer (целый), real (вещественный). Например: var i, j: integer; x: real; Описание каждого типа заканчивается точкой с запятой. Программный блок содержит операторы, описывающие алгоритм решения задачи.
Операторы ввода и вывода: read (список имён) – останавливает работу программы и ждёт, пока пользователь наберёт на клавиатуре числа (через пробел) и нажмёт ENTER. Например: read (i, j); После работы этого оператора курсор располагается за последним числом но не переводится на новую строку. Для перевода курсора на новую строку после ввода данных надо использовать оператор readln(список имён). write (список вывода) – выводит данные на экран. Список вывода - перечисленные через запятую имена результатов вычисления и пояснительные тексты в апострофах. Например: write(х=, х); На экране напечатается число с фиксированной точкой. Например: write(х=, х:6:2); на экране будет выдано число из 6 знаков из них два после запятой, (х =). Перевод курсора на новую строку осуществляется оператором пустого вывода writeln. Оператор пустого ввода readln
Работа в системе Турбо Паскаль Alt + F10 – меню File – New – создать новый файл Enter – следует поставить в конце каждой строки Сtrl + Y – удалить строку Enter – вставить строку Для выполнения программы надо в меню выбрать Run Транслятор – переводит программу с языка Паскаль на машинный язык и ищет синтаксические ошибки. 1.Если ошибки найдены, то произойдёт возврат в редактор, курсор укажет на ошибку. 2.Если ошибки не найдены, программа выполняется
Иногда после слов THEN и ELSE надо выполнить не один, а несколько операторов. Тогда эти операторы заключаются в операторные скобки. Открывающая скобка – слово BEGIN, закрывающая скобка – слово END. Перед словом ELSE точка с запятой не ставится. Рекомендуется каждую пару BEGIN – END записывать в одном столбце. IF условие THEN begin оператор 1; оператор 2; оператор N end ELSE begin оператор 1; оператор 2; оператор M end ;
Program E3; var a,b: integer; begin write (введите два целых числа через пробел, затем нажмите); readln (a,b); if a mod 2 = 0 then writeln (а – чётное) else writeln (а – нечётное); if b mod 2 = 0 then writeln (b – чётное) else writeln (b – нечётное); readln end.
3, если a>0 6, если a 0 6, если a 0 6, если a 0 6, если a0 6, если a title="3, если a>0 6, если a
Program E31; var a,y: real; begin write (введите число затем нажмите); readln (a); if a >0 then y:=3 else y:=6; write (y=,y); readln end. 0 then y:=3 else y:=6; write (y=,y); readln end."> 0 then y:=3 else y:=6; write (y=,y); readln end."> 0 then y:=3 else y:=6; write (y=,y); readln end." title="Program E31; var a,y: real; begin write (введите число затем нажмите); readln (a); if a >0 then y:=3 else y:=6; write (y=,y); readln end."> title="Program E31; var a,y: real; begin write (введите число затем нажмите); readln (a); if a >0 then y:=3 else y:=6; write (y=,y); readln end.">
A+b, если a>b a*b, если a b a*b, если a b a*b, если a b a*b, если ab a*b, если a title="a+b, если a>b a*b, если a
Program E32; var a,b,x: real; begin write (введите два числа через пробел затем нажмите); readln (a); if a >b then x:=a+b else x:=a*b; write (x=,x); readln end. b then x:=a+b else x:=a*b; write (x=,x); readln end."> b then x:=a+b else x:=a*b; write (x=,x); readln end."> b then x:=a+b else x:=a*b; write (x=,x); readln end." title="Program E32; var a,b,x: real; begin write (введите два числа через пробел затем нажмите); readln (a); if a >b then x:=a+b else x:=a*b; write (x=,x); readln end."> title="Program E32; var a,b,x: real; begin write (введите два числа через пробел затем нажмите); readln (a); if a >b then x:=a+b else x:=a*b; write (x=,x); readln end.">
Организация циклов Повторяющиеся действия в программировании называются циклом Оператор безусловного перехода goto n, n - целое число (не более 4-х символов), метка. Метка повторяется 3 раза: 1.В разделе Label; 2.В операторе goto; 3.Перед оператором на который осуществляется безусловный переход.
Организация циклов с помощью операторов условного и безусловного переходов. Задача. Найти сумму первых двадцати чисел. (1+2+3….+20). а ……………20 S ………….
Алгоритм Евклида: будем уменьшать каждый раз большее из чисел на величину меньшего до тех пор, пока оба числа не станут равными. Например: Исходные 1 шаг 2 шаг 3 шаг а= 25 b= НОД(а,b)=5
Program E5; var а, b: integer; begin write (НОД=,а); readln; end. write (Введите два натуральных числа через пробел); readln (a,b); while ab do if a>b then a:=a-b else b:=b-a; b then a:=a-b else b:=b-a;"> b then a:=a-b else b:=b-a;"> b then a:=a-b else b:=b-a;" title="Program E5; var а, b: integer; begin write (НОД=,а); readln; end. write (Введите два натуральных числа через пробел); readln (a,b); while ab do if a>b then a:=a-b else b:=b-a;"> title="Program E5; var а, b: integer; begin write (НОД=,а); readln; end. write (Введите два натуральных числа через пробел); readln (a,b); while ab do if a>b then a:=a-b else b:=b-a;">
B then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);" title="Program E6; var а, b: integer; begin write (НОD=,а); readln; end. repeat until a=b; if a>b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);" class="link_thumb"> 40 Program E6; var а, b: integer; begin write (НОD=,а); readln; end. repeat until a=b; if a>b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b); b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);"> b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);"> b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);" title="Program E6; var а, b: integer; begin write (НОD=,а); readln; end. repeat until a=b; if a>b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);"> title="Program E6; var а, b: integer; begin write (НОD=,а); readln; end. repeat until a=b; if a>b then a:=a-b; if b>a then b:=b-a write (Введите два натуральных числа через пробел); readln (a,b);">
Тема урока: «Циклы (повтор) в программах»
1)Повторить и закрепить знания составления линейных, разветвляющихся программ; 2)Научиться составлять программы, используя циклический оператор – FOR i:=1 TO n DO Begin операторы(тело цикла) end ; 3)Применять операторы в решении типовых задач. Цель урока:
Вставьте пропущенное: Program Sql; Var A,B,C,D, XI, Х2: ??? ; Begin Writeln ("Введите коэффициенты квадратного уравнения ’); Readln (???); D:=B*B-4*A*C; If D
Вопросы группе: 1)В чем отличие программ с ветвлением от линейных? 2)С помощью каких операторов осуществляется выбор в программах? 3) begin….end – Что это? Каковы правила использования в программе?
1)Операторы Ввода/вывода; 2)Операторы выбора; 3) а:=а+3 – что произойдет? 4)Перечислить типы данных; 5)Убрать лишнее AND,OR,END, NOT,IF ; 6) ; - что обозначает? 7) Как обозначается конец программы? 8) Перечислить арифметические операции. 9) Чему равно 120 mod 65 = ? 10) Операторы цикла.
Расставьте соответственно: 1. Read 2. End 3. Begin 4. Integer 5. ; 6. If .. Then 7. := 8. Ввод 9. Конец 10. Целые 11. Прис- воить 12. Следу-ющее действие 13.Начало 14.Если..то
Действительно ли результат а меньше 3 ? a:= 7 b:= - 10 a:=a*(- 7) b:=159 a:=b+a
Найдите 5 ошибок в программе: Program krug ; VAR Pi, r, S: real; Pi:=3.14, WRITELN(‘vvedite radiuc r=’), READ(r); S=Pi *r*r; WRITELN(‘Ploshad kruga S= ’, S) end
Program krug ; VAR Pi, r, S: real; begin Pi:=3.14 , WRITELN(‘vvedite radiuc r=’) , READ(r); S: =Pi *r*r; WRITELN(‘Ploshad kruga S= ’, S) end .
Задача №1 Дано целое N , определить является ли оно четным или нечетным. 2, 4, 6, …- четные, т.к. делятся без остатка на 2(N mod 2 =0) 1, 3, 7, … - нечетные, т.к. делятся на 2 с остатком 1(N mod 2 =1)
Алгоритм Алгоритм Chislo ; перем N: целые; начало Вывод(‘vvedite chislo’) ; Ввод (N) ; ЕСЛИ N mod 2 =0 Т O Вывод(N,‘- chetnoe‘); ЕСЛИ N mod 2 =1 Т O Вывод(N,‘- nechetnoe‘); конец.
Задача № 2 Дано целое двузначное число N (DE), где D – количество десятков, Е – единиц. Определить будет ли сумма цифр этого числа равна 10. Пример: у 28-ми сумма S =2+8=10 – будет, а у 27-ми S=2+7=9 не будет Будем считать десятки: D= N div 10 , а единицы: E= N mod 10
Алгоритм Алгоритм Chislo ; перем N,E,D,S: целые; начало Вывод(‘vvedite chislo’) ; Ввод (N) ; E:=N mod 10; D:=N div 10; S:=E+D; ЕСЛИ S = 10 Т O Вывод(‘summa= 10’) Иначе (‘summa10‘); конец.
Определение: Программы в которых многократно повторяются однотипные действия – циклические программы (с повтором).
Задача: Дано 100 натуральных чисел от 1 до 100 (1,2,3, … 99,100) Посчитать их сумму и вывести в переменную S.
Алгоритм сумма; Перем i,S: целые; Начало S:=0; Для i:=1 до 100 повторять Начало S:= S + i тело Конец; цикла Вывод (S) Конец.
Program summa; VAR i , S: integer; Begin S:=0; FOR i:=1 TO 100 DO begin S:=S+i тело end; цикла WRITE(S) end.
Program summa; VAR i , S: integer; Begin S:=0; FOR i:=1 TO 100 DO begin S:=S+i ; тело WRITE(‘S’, i, ’=‘, s) цикла end; end.
Тело цикла – те самые действия, которые нужно многократно повторять. Тело цикла заключаем в операторные скобки begin … .. end;
ALT + F9 - исправление ошибок CTRL + F9 – запуск программы ALT + F5 – просмотр результата
Задача: 1)Вывести столбец таблицы умножения любого целого числа N на числа от 1 до 10. Пример: N =5, то столбец будет такой- 1*5=5 2*5=10 3*5=15 i * N = P, где i изменяется от …… .. 1…10 10*5=50
Домашнее задание: прокомментировать программу для задачи «Про столбец таблицы умножения»
СПАСИБО ЗА ВНИМАНИЕ!
- 1. Pascal
- 2. Pascal Паскаль был разработан швейцарским ученым Никлаусом Виртом. Паскаль считается важнейшим инструментом для обучения методам структурного программирования и с 1983 г. введен в учебные курсы в школах для учащихся, которые специализируются в области информатики. В дальнейшем язык Паскаль совершенствовался и приобрел новые свойства, отличные от авторского варианта.
- 3. Язык Паскаль относительно прост в изучении, довольно ясен и логичен и, будучи первым изучаемым языком программирования, приучает к хорошему стилю.
- 4. Как и естественные языки, каждый язык программирования имеет свой стиль и свои правила. Синтаксис языка программирования – это набор правил, которые определяют способы построения правильных программ из символов алфавита.
- 5. Алфавит языка Паскаль 26 латинских строчных и 26 латинских прописных букв: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z a b c d e f g h i j k l m n o p q r s t u v w x y z подчеркивание _ 10 цифр: 0 1 2 3 4 5 6 7 8 9 знаки операций: + - * / = <> < > <= >= := @ ограничители (разделители): . , " () (. .) { } (* *) .. : ; спецификаторы: ^ # $
- 6. Структура программы {1. заголовок программы} program Имя_Программы; {2. раздел указания используемых модулей} uses Список_Используемых_Модулей; {3. Раздел описаний} label Описания_меток; const Описания_Констант; type Описания_Типов; var Описания_Переменных; procedure Описания_Процедур_и_функций; function exports Описания_Экспортируемых_Имен; {4. Раздел операторов} begin Операторы end.
- 7. Упрощенная структура программы {1. заголовок программы} program Имя_Программы; {2. раздел указания используемых модулей} uses Список_Используемых_Модулей; {3. Раздел описаний} const Описания_Констант; var Описания_Переменных; {4. Раздел операторов} begin Операторы программы end.
- 8. Команды языка программирования называются операторами Разделителем операторов в Паскале является; (точка с запятой)
- 9. Комментарий представляет собой фрагмент текста программы, ограниченный символами { }. Комменнтарии в программе выполняют информационную функцию. {Моя первая программа } program first; begin writeln(‘Hello, World!’) end.
- 10. Пример: периметр прямоугольника program perimetr; {заголовок программы} uses crt; {crt – необходим для очистки экрана} var a,b:integer; {объявление переменных} P:integer; Begin {начало программы} clrscr; {очистка экрана} a:=12; {присваиваем переменной а значение 12} b:=7; {присваиваем переменной b значение 7} P:=2*(a+b); {значение выражения присваиваем P} write("P = ",P); {выводим на экран значение P} end. {конец программы}
- 11. Программа в своей работе имеет дело с данными. Некоторые данные устанавливаются еще до того, как программа начнет выполняться, а после ее запуска сохраняют свои значения неизменными на всем протяжении работы программы. Это константы. Другие данные могут изменяться во время выполнения программы. Они называются переменными.
- 12. Различие между переменной и константой довольно очевидно: во время выполнения программы значение переменной может быть изменено, а значение константы нет. переменныепеременные константыконстанты данныеданные
- 13. Под переменной мы будем понимать ячейку («коробку»), куда компьютер может записывать («складывать») данные. Под ячейкой мы в действительности подразумеваем «кусочек памяти» в котором хранится информация. Чтобы воспользоваться информацией, хранящейся в ячейке, нужно, чтобы каждая ячейка имела свое имя или, как часто говорят, - идентификатор. a b sum 5 3 8
- 14. Идентификаторы. Именами (идентификаторами) называют элементы языка - константы, метки, типы, переменные, процедуры, функции, модули, объекты. Идентификатором является последовательность букв, цифр и знаков подчеркивания, которая начинается с буквы или символа подчеркивания и не содержит пробелов.
- 15. Имя может содержать произвольное количество символов, но значащими являются 63 символа. Не разрешается в языке ПАСКАЛЬ использовать в качестве имен служебные слова и стандартные имена, которыми названы стандартные константы, типы, процедуры, функции и файлы. Примеры имен языка ПАСКАЛЬ: A b12 r1m SIGMA gamma I80_86
- 16. В Паскале разница между строчными и прописными буквами игнорируется, поэтому имена NaMe и name одинаковы.
- 17. Служебное слово – это слово, которое в языке ПАСКАЛЬ имеет определенное смысловое значение, которое не может быть изменено. Иногда его называют ключевым словом.
- 18. Служебные (зарезервированные) слова: ABSOLUTE EXPORTS LIBRARY SET ASSEMBLER EXTERNAL MOD SHL AND FAR NAME SHR ARRAY FILE NIL STRING ASM FOR NEAR THEN ASSEMBLER FORWARD NOT TO BEGIN FUNCTION OBJECT TYPE CASE GOTO OF UNIT CONST IF OR UNTIL CONSTRUCTOR IMPLEMENTATION PACKED USES DESTRUCTOR IN PRIVATE VAR DIV INDEX PROCEDURE VIRTUAL DO INHERITED PROGRAM WHILE DOWNTO INLINE PUBLIC WITH ELSE INTERFACE RECORD XOR END INTERRUPT REPEAT EXPORT LABEL RESIDENT
- 19. Пробелы нельзя использовать внутри сдвоенных символов и зарезервированных слов. Существуют имена которые называются стандартными. sin cos real true В отличие от служебных слов смысл стандартных имен может быть переопределен программистом.
- 20. Это указание компилятору, сколько памяти необходимо зарезервировать для переменных нашей программы. В откомпилированной программе для всех переменных отведено место в памяти, и всем переменным присвоены нулевые значения. Все переменные, используемые в программе необходимо объявить в разделе описания переменных после зарезервированного слова var. Объявление переменных
- 21. Данные бывают различных типов...
- 22. Типы данных Имена стандартных типов являются предопределенными идентификаторами и действуют в любой точке программы. Они описаны в стандартном модуле System, который по умолчанию подключается в список используемых модулей. Пользовательские типы – это дополнительные типы (простые и структурированные) описанные пользователем.
- 23. Стандартные типы данных 1. группа целых типов (Shortint, Integer, Longint, Byte, Word); 2. группа действительных типов(Single, Real, Double, Extended, Comp); 3. логические (булевские типы)(Boolean, ByteBool, WordBool, LongBool); 4. символьный(Char); 5. строковый (String); 6. указательный (Pointer); 7. текстовый тип (Text).
- 24. Группа целых типов Название типа Тип диапазон значений требуемая память Короткое целое со знаком Shortint -128 .. 127 1 байт Целое со знаком Integer -32768 .. 32767 2 байта Длинное целое со знаком Longint -2147483648 .. 2147483647 4 байта Короткое целое без знака Byte 0 .. 255 1 байт Целое без знака Word 0 .. 65535 2 байта
- 25. Var b: byte; summa, count: integer; Объявление переменных целого типа summa:= -365; Испозование
- 26. Числа в языке ПАСКАЛЬ обычно записываются в десятичной системе счисления. Положительный знак числа может быть опущен. Целые числа записываются в форме без десятичной точки, например: 217 -45 8954 +483
- 27. Группа вещественных типов определяет те данные, которые реализуются подмножеством действительных чисел. Var A: real; begin ... A:=0.65; … End.
- 28. Название типа Тип Диапазон значений Количество цифр мантиссы Размер (байт) Вещественное число одинарной точности Real 2.9e-39 .. 1.7e+38 11 6 Вещественное число Single 1.5e-45 .. 3.4e+38 7 4 Вещественное число двойной точности Double 5.0e-324 .. 1.7e+308 15 8 Вещественное число повышенной точности Extended 3.4e-4932 .. 1.1e+4932 19 10 Целое число в формате вещественного Comp -9.2e+18 .. 9.2e+18 19 8
- 29. Действительные числа записываются в форме с десятичной точкой или в форме с использованием десятичного порядка, который изображается буквой Е: 28.6 0.65 -0.018 4.0 5Е12 -1.72Е9 73.1Е-16
- 30. Булевскому типу данных соответствует идентификатор Boolean. Переменные булевского типа имеют размер 1 байт и могут содержать значения TRUE или FALSE. Значению FALSE соответствует 0, любое число отличное от нуля считается TRUE. Var knopka, flag: boolean; Begin knopka:=true;
- 31. Символьному типу соответствует стандартный идентификатор Char. Переменные и константы символьного типа могут принимать значения из множества символов кода ASCII. Var simvol, bukva, z: char; Объявление символьных переменных
- 32. Строковому типу соответствует стандартный идентификатор String. Var S: String; {строка от 0 до 255 символов} S2: String; {стока из 5-ти символов}
- 33. Строка символов представляет собой последовательность символов из набора символов кода ASCII, заключенную в одиночные кавычки. Строки в языке ПАСКАЛЬ - это последовательность символов, записанная между апострофами. Если в строке в качестве содержательного символа необходимо употребить сам апостроф, то следует записать два апострофа. Примеры строк: "СТРОКА" "STRING" "АД""ЮТАНТ"
- Символьный тип, а также целые и булевские типы относят к, так называемым, порядковым типам. Множество допустимых значений любого порядкового типа представляет собой упорядоченную последовательность, каждый элемент которой имеет свой порядковый номер (начиная с 0).
- 35. Функция Ord возвращает порядковый номер этого значения в описании типа. Ord(2)=2, Ord(‘0’)=48 Writeln(ord(‘e’)); Writeln(ord(‘9’));
- 36. Таблица кодировки ASCII ASCII (American Standard Code for Information Interchange; произносится «а́ски») -компьютерная кодировка для представления латинского алфавита, арабских цифр, некоторых знаков пунктуации и управляющих символов. Ее ввел американский институт стандартизации ANSI.
1 слайд
«ЗНАКОМСТВО С ЯЗЫКОМ ПАСКАЛЬ» УРОК НА ТЕМУ: Учитель математики и информатики МБО УСОШ № 2 г. Калача-на-Дону Волгоградской области Анисимовой Н.А.
2 слайд
ЦЕЛЬ УРОКА: выяснить структуру программы, операторы, правила оформления и пунктуацию языка Turbo Pascal.
3 слайд
Система программирования TURBO PASCAL. Паскаль – это универсальный язык программирования, позволяющий решать самые разнообразные задачи обработки информации.
4 слайд
1)язык программирования Тurbo Pascal; 2)интегрированная среда программирования(компилятор: переводит программу в машинный код и интерпретатор: исполняет команды) СОСТАВ СИСТЕМЫ ПРОГРАММИРОВАНИЯ ТР:
5 слайд
1)латинские буквы – большие и малые; 2)буквы русского алфавита - большие и малые; 3)цифры – от 0 до 9; 4)знаки операций - +, -, /, *,=, =; 5)разделительные знаки – () { } ; . , ‘ _% & # и т. Д. Алфавит языка программирования TURBO PASCAL
6 слайд
7 слайд
Заголовок программы Раздел описания переменных Раздел операторов (основная часть)
8 слайд
Раздел описания переменных начинается со слова Var , за которым идет список имен однотипных переменных через запятую. В языке Паскаль существует два числовых типа величин: вещественный (Real) и целый (Integer). Имена переменных составляются из латинских букв и цифр, причем первым символом - буква. VAR список однотипных переменных: INTEGER; список однотипных переменных:REAL;
9 слайд
Раздел операторов – основная часть программы. Начало и ко-нец раздела отмечаются служебными словами BEGIN и END , которые являются операторными скобками. Между этими сло-вами помещаются все команды алгоритма, записанные на языке Паскаль (операторы). Разделителем операторов являет-ся точка с запятой. В самом конце программы ставится точка. BEGIN READ(список ввода); READLN(список ввода); переменная:=арифметическое выражение; WRITE(список вывода); WRITELN(список вывода); END.
10 слайд
Ввод исходных данных с клавиатуры происходит по опе-ратору READ или READLN (читать). Оператор READLN отличается от READ только тем, что после ввода данных курсор перемещается в начало новой строки. переменная:=арифметическое выражение; WRITE(список вывода); WRITELN(список вывода); END. READ(список ввода); READLN(список ввода);
11 слайд
переменная:=арифметическое выражение; Арифметический оператор присваивания: слева- переменная, справа - арифметическое выражение, которое должно быть вычислено. Составной символ:= читается как «присвоить». Сначала вычисляется арифметическое выражение, затем полученное значение присваивается переменной.Пример: a:= sqr (x) + sin (y) / (12*z + 5)
12 слайд
mod div / * - + SIN (x) COS (x) SQR (x) SQRT (x) ABS (x) Sin x Cos x x 2 |x| x сложение вычитание умножение деление деление нацело Остаток от деления
13 слайд
Правила записи арифметических выражений Арифметическое выражение записывается в строку Нельзя ставить подряд два знака арифметических операций Нельзя опускать знак умножения между сомножителями Используются только круглые скобки Последовательность выполнения операций определяется по их приоритетам () F(x) * / + - div mod
14 слайд
Вывод результатов происходит по WRITE или WRITELN (писать). Результаты выводятся в порядке их перечисле-ния в списке. Разница в выполнении операторов WRITE и WRITELN состоит в том, что после выполнения операции вывода по оператору WRITELN курсор перемещается в начало новой строки. WRITE(список вывода); WRITELN(список вывода);
15 слайд
Задание 1: AXby 6) TU154 2) R&B 3) 4Wheel 4) Вася 5) “PesBarbos” 7) 8) _ABBA 9) A+B
16 слайд
program zadacha1; var a, b: integer; x, y: real; begin a:= 5; 10:= x; y:= 7,8; b:= 2.5; x:= 2*(a + y); a:= b + x; end. имя переменной должно быть слева от знака:= целая и дробная часть отделяются запятой и несоответствие типов Несоответствие типов ЗАДАНИЕ 2: Найдите ошибки в записи программы.
PASCAL
ВВЕДЕНИЕ В ЯЗЫК
ПРОГРАММИРОВАНИЯ
2006
СТРУКТУРА КУРСА
интерфейс и основные определения;
структура программы;
вывод на экран текстовой информации;
ввод данных с клавиатуры;
подключение и использование системных модулей;
работа с основными типами данных
(целый, вещественный, строковый, массив, файловый)
работа с графикой;
использование подпрограмм (процедуры и функции);
использование модулей.
2
ИНТЕРФЕЙС СРЕДЫ PASCAL
Язык программирования Turbo Pascal 7.0 заключён в
инструментальную оболочку. Она включает в себя:
многооконный текстовый редактор;
компоновщик программ;
отладчик программ;
систему помощи;
компилятор.
3
ИНТЕРФЕЙС СРЕДЫ PASCAL
4
Список открытых файлов:
Alt + 0
Быстрый доступ к открытым файлам:
Alt + <№ окна>
ОСНОВНЫЕ ОПРЕДЕЛЕНИЯ
Зарезервированное слово – это специальное слово,
используемое языком программирования для отделения
логических областей программы.
Оператор – это команда языка выполняющая какое-либо
действие (проверка условия, организация цикла и пр.)
Идентификатор – это имя, свободно избираемое
программистом для элементов программы.
Тип данных – это характеристика идентификатора,
определяющая множество значений, которые он может
принимать (целые или дробные числа, строки символов,
логически выражения и пр.).
5
ОБЩАЯ СТРУКТУРА ПРОГРАММЫ
Program Имя_программы;
Uses
раздел подключаемых модулей;
Label
раздел описания меток;
Const
раздел описания констант;
Type
раздел описания собственных типов данных;
Var
раздел описания переменных;
Begin
Основное тело программы;
End.
Минимальный код:
6
ВЫВОД НА ЭКРАН
Для вывода информации на экран, используются операторы:
Write или Writeln.
F9 – Компиляция + проверка
Ctrl+F9 – Запуск
F9 → Ctrl+F9 – избежание ошибок
Отображение результатов
выполнения программы
7
ВЫВОД НА ЭКРАН
Результат применения операторов:
WRITE
«Пустой» оператор WRITELN
добавляет пустую строку
WRITELN
8
УПРАЖНЕНИЕ
Выведите информацию на экран так, как показано
ниже
Hello!
Nice to see you!
Call me computer.
Используемый материал:
Операторы вывода: Write, WriteLn
«Пустой» оператор WriteLn; вставляет пустую
строку.
9
ПОДКЛЮЧЕНИЕ ДОПОЛНИТЕЛЬНЫХ МОДУЛЕЙ
Дополнительные модули расширяют возможности ваших
программ, путём введения дополнительных операторов.
Модули подключаются в разделе Uses.
Program My;
Uses Модуль1,
Модуль2 ;
________________________
________________________
________________________
________________________
МОДУЛЬ 1
Набор
ресурсов 1
…
МОДУЛЬ N
Модули:
Системные
Собственные
Набор
ресурсов N
Очистка текстового экрана
Ожидание нажатия на клавишу
Подключённый модуль
с именем CRT
10
ВЫВОД В ПРОИЗВОЛЬНОЕ МЕСТО ЭКРАНА
GotoXY (X, Y: Integer)
Где X, Y – координата знакоместа на экране.
X может принимать значения от 1 до 80, а Y от 1 до 25.
Например:
Program My_program;
{Подключение модуля}
Uses Crt;
Begin
{Очистка экрана}
ClrScr;
{Вывод данных}
GotoXY(1, 1); write("▒");
GotoXY(80, 1); write("▒");
GotoXY(1, 25); write("▒");
GotoXY(80, 25); write("▒");
{Задержка экрана}
ReadKey;
End.
Программа выводит по
углам экрана символ “▒”
(код 177).
11
ВЫВОД В ЦВЕТЕ
TextColor (Color);
Определяет цвет символов.
TextBackground (Color);
Определяет цвет знакоместа.
Program MyProgram;
Uses Crt;
Begin
TextColor(Red);
TextBackGround(Blue);
Write("На дворе ");
TextColor(White);
Write("трава, ");
TextColor(Green);
TextBackGround(Yellow);
Write("на траве ");
TextBackGround(Magenta);
Write("дрова.");
End.
0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Цвета
Black
Blue
Green
Cyan
Red
Magenta
Brown
LightGray
DarkGray
LightBlue
LightGreen
LightCyan
LightRed
LightMagenta
Yellow
White
12
– чёрный
– синий
– зелёный
– циановый
– красный
– сиреневый
– коричневый
– светло-серый
– тёмно-серый
– голубой
– светло-зелёный
– светло-циановый
– розовый
– светло-сиреневый
– жёлтый
– белый
РАБОТА С ДАННЫМИ
РАБОТА С ДАННЫМИ
ОБЪЯВЛЕНИЕ
ИДЕНТИФИКАТОРОВ
14
ЗАДАНИЕ
ТИПА
ДАННЫХ
Идентификация
данных
Однозначность
операций над
данными
ЗАДАНИЕ
ЗНАЧЕНИЙ
Операции с
данными
ИДЕНТИФИКАТОРЫ
Термин идентификатор применяется к константам, переменным, функциям, процедурам, компонентам и другим объектам, определяемым
пользователем.
Разрешённые символы:
латинские буквы;
цифры;
знак подчёркивания.
Ограничения:
не должны начинаться с цифры, но могут начинаться со знака
подчёркивания.
не могут состоять из нескольких слов.
не могут совпадать с каким-либо из ключевых слов.
В идентификаторах не учитывается регистр символов.
Ошибочные идентификаторы:
Данные
My name
2Array
Var
{
{
{
{
Используются русские символы }
Есть пробел }
Начинается с цифры }
Совпадает с ключевым словом }
15
ТИПЫ ДАННЫХ
Тип данных – это характеристика идентификатора, определяющая множество значений, которые он может принимать
(целые или дробные числа, строки символов, логически выражения и пр.).
16
ЦЕЛЫЙ ТИП ДАННЫХ
17
Конечный набор возможных значений
тип
byte
shortint
word
integer
longint
диапазон
0..255
-128..127
0..65535
-32768..32767
-2147483648..2147483647
! Выход за пределы диапазона приводит к ошибке!
разм
ОБЪЯВЛЕНИЕ ПЕРЕМЕННЫХ
Переменная – это идентификатор, способный хранить
какое-либо значение (число, строку и т.п.) и менять его в
процессе работы программы.
Синтаксис:
Var <имя переменной> : <тип переменной> ;
Program Имя_программы;
Uses
раздел подключаемых модулей;
Var
раздел описания переменных;
Begin
Основное тело программы;
End.
Зарезервировано место в памяти
компьютера под 3-и переменных
18
ЗАДАНИЕ ЗНАЧЕНИЙ ПЕРЕМЕНЫМ
Для задания значения переменной, необходимо воспользоваться оператором присваивания:=
Синтаксис записи:
<Переменная> := <Значение> ;
В переменную (целочисленную)
с именем А заносится значение 3
19
ОПЕРАЦИИ С ЦЕЛЫМИ ПЕРЕМЕННЫМИ
20
Арифметические операции: + - * /
Стандартные операции:
div | mod | sqr
Нельзя использовать с
целыми типами
В переменную с именем S заносится
сумма значений, которые хранятся в
переменных X и Y
Значение, хранящееся в переменной с
именем S выводится на экран
УПРАЖНЕНИЕ
21
1. Напишите программу, которая выводит на экран
результат умножения чисел 15 и 20.
2. Напишите программу, которая выводит на экран
значение функции f 2 x 3 y , при x=11, y=3
Используемый материал:
Переменные объявляются в разделе Var
Целый тип называется Integer
Синтаксис присвоения переменной значения:
<Переменная> := <Значение> ;
После каждого оператора ставится знак; (кроме
begin и последнего end)
ВЕЩЕСТВЕННЫЙ ТИП ДАННЫХ
Множество значений
√
√
Порядковый тип
Вещественный тип
Односторонняя совместимость:
Вещественный
Целый
Целый
Вещественный! Выход за пределы диапазона и несоблюдение правил
совместимости приводит к ошибке!
22
ОПЕРАЦИИ С ВЕЩЕСТВЕННЫМИ ПЕРЕМЕННЫМИ
23
Стандартные операции:
pi | Sqrt | Sin | Cos | Abs | Exp | Ln
Round | Trunc (вещественный → целый)
Например (X, S – тип Real):
X:= pi/3;
S:= Sin(X) * 100;
Write (Round(S));
В переменную с именем S заносится
отношение значений, которые хранятся в
переменных X и Y
Позиция числа и число символов в дробной
части числа
E – обозначает степень числа.
5.6E-5 = 5.6·10-5
СТРОКОВЫЙ ТИП ДАННЫХ
24
Строки – упорядоченный
набор символов.
Строки заключены в апострофы.
Строки не совместимы с целыми и
вещественными типами.
Тип
Диапазон
String 255 символов
{ Основные операторы для строк }
+
{ конкатенация }
Length (S); { длина строки }
Например:
X:= ‘Вася’;
Write(‘В вашем имени’,
Length(X),
‘букв.’);
S:= X;
X:= S;
УПРАЖНЕНИЕ
Напишите программу, которая выводит на экран
результат деления чисел 12.89 и 0.22 с отображением только трёх значащих цифр после запятой в
следующем формате:
первое число
разделить на второе число = результат
Write (X:1:3, ‘ razdelit na ’, y:1:3, ‘ = ’ z:1:3)
Используемый материал:
Строковый тип называется String
Строки заключаются в опострафы
Конкатенация строк происходит через знак +
В операторе вывода на экран, разные типы
отделяются запятой
25
ВВОД ДАННЫХ С КЛАВИАТУРЫ
26
Для того, чтобы ввести информацию с клавиатуры, необходимо воспользоваться оператором ввода: Read или ReadLn.
Синтаксис:
Read (N1, N2, … Nn);
Где N1, N2, … Nn – переменные
(целые, вещественные, строковые)
В переменную Х, заносится значение введенное с клавиатуры
После ввода значения, необходимо нажать клавишу Enter
Если переменных в операторе
указано несколько, то они вводятся
через пробел, либо через нажатия
клавиши Enter
УПРАЖНЕНИЕ
27
1. Напишите программу «мини-калькулятор»,
которая вычисляет сумму двух чисел, введенных
с клавиатуры.
2. Напишите программу, которая спрашивает как
Вас зовут, а после того как Вы напишите свое имя
выводит приветствие. Например, если Вы ввели имя
Ваня, то программа выведет фразу: Привет, Ваня!!!
Используемый материал:
Операторы ввода: Read, ReadLn
ОПЕРАТОРЫ
УСЛОВНЫЙ ОПЕРАТОР
29
Условный оператор реализует «ветвление», т.е изменяет
порядок выполнения операторов в зависимости от истинности или ложности некоторого условия.
Проверка условия
НЕТ
Действие 1
Пойду на пляж
Идёт дождь
ДА
Действие 2
Возьму зонт
Действие 3
Пойду в кино
ПРОВЕРКА УСЛОВИЙ
Операции сравнения:
>
- больше
<
- меньше
=
- равно
>= - больше или равно
<= - меньше или равно
<> - не равно
30
Логические операции:
Not
And
Or
- Не
-И
- Или
Например:
Если Мой рост > Роста Пети, То я выше Пети
Если (идёт дождь) Или (идёт снег), То я останусь дома
Если Не ((идёт дождь) И (ветер)), То я пойду гулять
При использовании логических операций, условия заключаются в скобки
СИНТАКСИС ЗАПИСИ УСЛОВНОГО ОПЕРАТОРА
Краткая форма:
If <условие> then <оператор>;
Например, если в переменной Х значение меньше чем 0, тогда в эту же
переменную записывается значение 1:
If X<0 Then X:= 1;
Полная форма:
If <условие> then <оператор_1>
else <оператор_2> ;
Например:
If X>5 Then X:= X - 1
Else X:= X + 1;
После слов Then и
Else можно использовать только один оператор
Перед словом Else,
знак; отсутствует
31
УПРАЖНЕНИЕ
32
1.
Напишите программу, которая получает на вход сумму в
долларах и сумму в евро, а затем выводит на экран в
какой валюте сумма больше (1 доллар=28 руб., 1 евро=35
руб.)
2.
Напишите программу, которая получает на вход три
числа, а затем выводит на экран максимальное из них.
Используемый материал:
Формы записи условного оператора:
If <условие> Then <оператор>;
If <условие> Then <оператор_1>
Else <оператор_2> ;
Перед Else знак; не ставится
Операции сравнения: > < = <> >= <=
Логические операции: Not Or And
ОПЕРАТОРНЫЕ СКОБКИ
Если после слов Then или Else необходимо записать несколько операторов, то их заключают в операторные
скобки (составной оператор).
Операторные скобки начинаются словом Begin, а заканчиваются словом End;
Например:
If Z > 0 Then Begin
X:= 1;
Y:= -1;
WriteLn(‘Информация принята’);
End
Else
WriteLn(‘Ошибка’);
33
ОПЕРАТОР ВЫБОРА CASE
Оператор выбора используется для замены конструкций
из вложенных условных операторов.
Синтаксис записи
Case <порядковая_переменная> of
<значение_1> : <оператор_1> ;
<значение_2> : <оператор_2> ;
………
<значение_N> : <оператор_N>
Else <оператор_N+1> ;
End;
В операторе выбора
можно использовать
операторные скобки
Не обязательная строка
34
ОПЕРАТОР ВЫБОРА CASE
Case Рост ученика of
16..30: Вы ученик начальных классов;
31,32,33: Вы учитесь в классе 5-6 ;
34..50: Вы старшекласник
Для перечисления
значений используется
запятая, для выбора
диапазона – двоеточие
Else Вы явно не ученик;
End;
Case x of
-128..-1: writeln(‘Отрицательные’);
0:
writeln(‘Ноль’);
1..127:
writeln(‘Положительные’)
Else WriteLn(‘Выход из диапазона’);
End;
35
УПРАЖНЕНИЕ
Напишите программу, которая получив число, выводит на
экран соответствующий день недели. Например, ввели
число 2, программа должна вывести ‘Вторник’.
Если число выходит за пределы 1..7, то должно быть
выведено сообщение, что такого дня нет.
Используемый материал:
Оператор выбора:
Case <порядковая_переменная> of
<значение_1> : <оператор_1> ;
………
<значение_N> : <оператор_N> ;
Else <оператор_N+1> ;
End;
36
ЦИКЛЫ
37
Циклическими называются алгоритмы, у которых выполнение некоторых операторов осуществляется многократно
с одними и теми же модифицированными данными
(например, процедура умножения чисел через их многократное сложение).
В языке Паскаль имеются три оператора цикла:
For (цикл с параметром или на заданное число повторений)
While (цикл ПОКА)
Repeat (цикл ДО)
Если число повторений известно, то лучше воспользоваться оператором цикла с параметром.
ЦИКЛ С ПАРАМЕТРОМ
38
Цикл на заданное число повторений с возрастающим или убывающим значением параметра
For {парам} := {нач_зн} To
{кон_зн} Do
{оператор} ;
Тело цикла
Замечания
Параметр – целый тип;
В цикле можно использовать операторные
скобки;
В теле цикла нельзя менять параметр цикла;
Параметр цикла увеличивается на единицу;
Начальное значение > конечного, иначе тело
цикла игнорируется;
Для уменьшения параметра, за место To,
использовать DownTo.
ЦИКЛ С ПАРАМЕТРОМ
39
Написать программу, которая запрашивает целые числа (a, b), причём a