Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Свидетельство о публикации

Автоматическая выдача свидетельства о публикации в официальном СМИ сразу после добавления материала на сайт - Бесплатно

Добавить свой материал

За каждый опубликованный материал Вы получите бесплатное свидетельство о публикации от проекта «Инфоурок»

(Свидетельство о регистрации СМИ: Эл №ФС77-60625 от 20.01.2015)

Инфоурок / Информатика / Презентации / Презентация по информатике "Учебник по Паскалю"
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 28 июня.

Подать заявку на курс
  • Информатика

Презентация по информатике "Учебник по Паскалю"

библиотека
материалов
Система программирования Турбо Паскаль, разработанная американской корпорацие...
Среда программирования позволяет создавать тексты программ, компилировать* их...
Программа записывается в соответствии с синтаксисом Паскаля и используется ег...
1.5.Служебные слова: and, array,…,while, with, xor 6 Неиспользуемые символы...
* Программа на Паскале делится на две части - это: 1. Описание данных, над ко...
* Целые типы В программе записывается как последовательность цифр со знаком и...
* Действительный (вещественный) тип Real Под хранение значений действительног...
* Символьный тип Char Для хранения данных символьного типа выделяются ячейки...
* Логический тип Boolean Для хранения данных логического типа выделяются ячей...
* Строковый тип (относится к структурным) String Для хранения данных типа Str...
* Выражения определяют действия и порядок их выполнения при вычислении значен...
* Переменные используются для обозначения величин, которые изменяются в ходе...
* Стандартные функции служат для облегчения записи и обращения к наиболее час...
* * ORD(X)	Преобразует любой порядковый тип в целый (можно узнать ASCII-коды...
* * Функции разнообразного назначения			 RANDOM[(X)]	Формирует случайное числ...
* Арифметические операции * Знак	Операция	Тип операндов	Тип результата +	Слож...
* Операции отношения * Знак	Операция	Тип операндов	Тип результата =	Равно	Люб...
* Логические операции Круглые скобки используются для заключения в них части...
* * Группа	Типы действий	Операции или элементы 1	Вычисления в круглых скобках...
* Пример: (X>0) and (X3; г)1111; 4.Какие из следующих последовательностей сим...
* Программа состоит из заголовка программы и блока программы Заголовок: Progr...
* В Турбо Паскале в качестве меток разрешается использовать имена (идентифика...
* Раздел определения констант Const ; Пример: Const g=15.37; Max=10000; Str=’...
* Раздел операторов Раздел операторов считается обязательным, он всегда после...
* Раздел операторов По составу операторы разделяются на следующие виды: прост...
* Линейные программы могут включать в себя операторы присваивания, ввода-выво...
* Операторы ввода-вывода В общем случае ввод и вывод значений происходит из ф...
* Оператор вывода Оператор вывода на экран имеет 3 модификации: Write(B1,B2,…...
* Пример: Write(123.456:10:4); Write(123.456:6:2); Значения типа Char и Strin...
* Writeln(B1,B2,…,Bn); Отличается от первого тем, что после вывода последнего...
* Оператор ввода * назад
* Задача . Составить программу – «Диалог с компьютером» Решение: Program Lin2...
* Задача 3. Даны числа A,B,C. Переприсвоить их значения следующим образом: A...
* Задачи: Какие из следующих последовательностей символов являются операторам...
* Для организации разветвления в программе, в Паскале используются следующие...
* Задача: Даны 2 различных числа. Найти максимальное из этих чисел. Пример: И...
* Задачи: 1. Даны 2 числа. Вывести первое число, если оно больше второго и об...
* Если по смыслу задачи, в зависимости от условий, надо выполнять либо одну,...
* Задача . Даны числа A, C. Решить линейное уравнение A*X=C с полным анализом...
* Задачи: Даны X,Y (ХY). Меньшее из этих двух чисел заменить полусуммой, а бо...
* (связки “и”; “или”). При записи составных логических условий следует помнит...
* Задачи Даны числа А, В, С. Определить есть ли среди них отрицательные числа...
* Case B of :S1; :S2; : :Sn; [Else S;] End; S1, S2,…, Sn – любые операторы в...
* Задача : По номеру дня недели вывести соответствующее ему название. Решение...
* Задача : По заданному символу определить, является ли он цифрой, латинской...
* Оператор перехода имеет вид: Goto M; M- метка. Все метки должны быть описан...
* Задача Даны 3 отрицательных числа. Найти предыдущее и следующее значение ма...
* В Паскале существуют 3 оператора цикла: Цикл с постусловием («До») Оператор...
* N Mk; M1; M2; Repeat M1; M2; : Mk; Until N; Блок - схема : : - Repeat – пов...
* Задача . Найти произведение чисел от 1 до 10. Решение: Program Ci1; Var K:I...
While – пока; Do – выполнять; N – выражение, имеющее логическое значение (усл...
* Задача . Даны числа от 1 до N (N – четное). Найти: S= Решение: Program Ci2;...
* Задачи: 1. Даны числа от 1 до N. Найти: Р= 2. Даны числа от 1 до N (N – неч...
* Оператор цикла с параметром имеет 2 модификации: For K:=N1 to N2 do M; (с в...
* Задача . Вывести коды всех строчных символов латинского алфавита. Решение:...
* Таблицы и табличные величины Описание массива (в разделе Var ) Одномерные м...
* При решении задач человек очень часто пользуется таблицами. При записи исхо...
* Пример: Составим таблицу размещения пассажиров в первых 6-ти вагонах на мес...
* В Турбо Паскале существует возможность работы с таблицами, они имеют назван...
* Рассмотрим работу с одномерными массивами (в алгебре они называются вектора...
* Задача Задан одномерный массив из N чисел. Изменить все элементы массива, у...
* Решение: Program Mass1; {1}Var Tab:Array[1..10] of Integer; I,N:Integer; Be...
* Задачи для самостоятельного решения: Задан одномерный массив из N чисел. Из...
* Задача . Задан одномерный массив из N чисел. Найти максимальный элемент мас...
* Задачи: Задан одномерный массив из N чисел. Найти минимальный элемент масси...
* Задача . Задан одномерный массив из N чисел. Отсортировать все элементы мас...
* Задачи: Задан одномерный массив из N строк, имеющих вид фамилий. Отсортиров...
* Задан одномерный массив из N чисел. Составить новый массив, состоящий из те...
* Рассмотрим работу с двумерными массивами (в алгебре они называются матрицам...
* Задача 1. Задан массив из целых чисел, размерностьюN*M (N-строки, M-столбцы...
* Задача 2. Задан массив из строк, размерностьюN*M (N-строки, M-столбцы). Отс...
* При решении многих задач возникает необходимость проведения одних и тех же...
* Использование подпрограмм позволяет применять принципы структурного програм...
* Структура описания процедур аналогична самой программе. Она состоит из заго...
* Чтобы исполнить процедуру, в нужном месте программы записывается оператор о...
* Перед ними ставится слово Var. Для формального параметра – переменной испол...
* Задача. Составить программу вычисления максимального из 4-х чисел, использу...
* Задачи: Правильно ли описана процедура и обращение к ней (если есть ошибки,...
* Для каждого из приведенных ниже описаний процедур сформулировать назначение...
* Слово Var не ставится. Используются только для передачи исходных данных в п...
* Пример1. Program A1; Var X:Integer; Procedure Zamena(Y:Integer); Begin Y:=1...
* Задача: Составить программу обращения к процедуре вычисления натуральной ст...
* Задачи В программе описана процедура Р с формальными параметрами X,Y и проц...
* Функция – это подпрограмма, результатом выполнения которой является одно ед...
* * Обращение к функции: Обращение к функци не является оператором, оно входи...
* * Модули можно использовать для создания библиотек стандартных подпрограмм...
* * Функции работы со строками Function Сoncat(S1[S2,...,Sn]:String):String;...
* Function Сopy(S:String;I,C:Integer):String; Создает подстроку строки S S -...
* Function Length(S:String):Integer; Возвращает текущий размер строки S - стр...
* * Function Pos (S1,S2:String):Byte; Поиск последовательности S1 в строке S2...
* * Процедуры работы со строками Procedure Delete(Var S:String;I,C:Integer);...
* * Procedure Insert(C:String;Var S:String;I:Integer); Помещает подстроку C в...
* * Procedure Str(X[:M[:N]];Var S:String); Преобразует число в последовательн...
* * Procedure Val (S:String;Var X; Var C:Integer); Преобразует символьное пре...
* * Задача: Составить программу, которая подсчитывает количество слов в предл...
* * Задачи для самостоятельного решения Дана строка, имеющая вид предложения....
* * Модули можно использовать для создания библиотек стандартных подпрограмм...
97 1

Подайте заявку сейчас на любой интересующий Вас курс переподготовки, чтобы получить диплом со скидкой 50% уже осенью 2017 года.


Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Описание презентации по отдельным слайдам:

№ слайда 1 Система программирования Турбо Паскаль, разработанная американской корпорацие
Описание слайда:

Система программирования Турбо Паскаль, разработанная американской корпорацией Borland, остается одной из самых популярных систем программирования в мире. Этому способствуют, с одной стороны, простота лежащего в ее основе языка программирования Паскаль, а с другой стороны – труд и талант сотрудников Borland во главе с создателем Турбо Паскаля Андерсом Хейлсбергом. Придуманный, примерно в 1970 году, швейцарским ученым Никласом Виртом как средство для обучения студентов программированию, язык Паскаль стараниями А. Хейлсберга превратился в мощную современную профессиональную систему программирования, которой по плечу любые задачи. Турбо Паскаль включает в себя как язык программирования – одно из расширений языка Паскаль для ЭВМ типа IBM, так и среду, предназначенную для написания, запуска и отладки программ. * * Проект создан группой учащихся 11 класса МОУ СОШ № 24 Смоленск 2011

№ слайда 2 Среда программирования позволяет создавать тексты программ, компилировать* их
Описание слайда:

Среда программирования позволяет создавать тексты программ, компилировать* их, находить ошибки и исправлять их, компоновать программы из отдельных частей, включая стандартные модули, отлаживать и выполнять отлаженную программу. Язык характеризуется расширенными возможностями по сравнению со стандартом, хорошо развитой библиотекой модулей, позволяющей использовать возможности операционной системы, создавать оверлейные структуры, организовывать ввод-вывод, формировать графические изображения и т.д. * *

№ слайда 3 Программа записывается в соответствии с синтаксисом Паскаля и используется ег
Описание слайда:

Программа записывается в соответствии с синтаксисом Паскаля и используется его алфавит. Алфавит – совокупность допустимых в языке символов. 1 Латинские буквы A,B,...,Z; a,b,…,z; Прописные и строчные буквы не различаются. 2 Арабские цифры 0,1,2,…, 9; 3 Специальные символы | { } | [ ] | ( ) | ‘ | := | ; | : | = | , | .. | . | ^ | @ | # | $ | 4 Знаки операций Знаки операций предназначены для обозначения арифметических, логических или других действий (см. таблицы темы “”) * *

№ слайда 4 1.5.Служебные слова: and, array,…,while, with, xor 6 Неиспользуемые символы
Описание слайда:

1.5.Служебные слова: and, array,…,while, with, xor 6 Неиспользуемые символы Некоторые символы, например: | % | & | и т.д. не используются в Турбо Паскале, но их можно использовать в комментариях и строках 4 Знаки операций Знаки операций предназначены для обозначения арифметических, логических или других действий (см. таблицы темы “”) * *

№ слайда 5 * Программа на Паскале делится на две части - это: 1. Описание данных, над ко
Описание слайда:

* Программа на Паскале делится на две части - это: 1. Описание данных, над которыми совершаются действия 2. Описание действий над данными В соответствии с описанием данных компилятор распределяет память, т.е. выделяет ячейки нужной длины Под типом данных понимается множество допустимых значений этих данных, а также совокупность операций над ними. В Турбо Паскале имеются следующие группы простых типов: Целый тип Integer … Действительный (вещественный) тип Real Символьный тип Char Логический тип Boolean Строковый тип String *

№ слайда 6 * Целые типы В программе записывается как последовательность цифр со знаком и
Описание слайда:

* Целые типы В программе записывается как последовательность цифр со знаком или без. Примеры: +4; 168; -1245; +000; * Тип Диапазон Формат Размер в байтах Integer 215 Знаковый 2 Longint 231 Знаковый 4 Byte 28 Беззнаковый 1 Word 216 Беззнаковый 2 Shortint 27 Знаковый 1

№ слайда 7 * Действительный (вещественный) тип Real Под хранение значений действительног
Описание слайда:

* Действительный (вещественный) тип Real Под хранение значений действительного типа отводятся ячейки длиной в 6 байт. В этих 6-ти байтах под хранение порядка отводится столько бит, сколько позволяет записать порядок (до 99). Остальные биты отводятся под хранение мантиссы, что обеспечивает точность в 12 -14 значащих цифр. В программе может записываться в двух формах: естественная форма В виде последовательности цифр со знаком или без, в которой целая и дробная части разделены точкой. Примеры: +13.167; -0.0002; форма с порядком mEp m – мантисса – либо целое число, либо действительное в естественной форме. Р – порядок – двузначное целое число (не более 99) Е – десятичное основание степени Пример: 3.123Е-; 1234Е12 * *

№ слайда 8 * Символьный тип Char Для хранения данных символьного типа выделяются ячейки
Описание слайда:

* Символьный тип Char Для хранения данных символьного типа выделяются ячейки длиной в 1 байт. В программе записывается как любой символ клавиатуры, заключенный в апострофы Пример: ’1’; ’d’; ’#’; Символьный тип Для хранения данных символьного типа выделяются ячейки длиной 256 байт, 1-й байт содержит признак строки, поэтому длина строки не должна превышать 255 символов В программе записывается, как последовательность символов, заключенных в апострофы. Примеры: ’информатика’; ’******************’; ’35545767’; * *

№ слайда 9 * Логический тип Boolean Для хранения данных логического типа выделяются ячей
Описание слайда:

* Логический тип Boolean Для хранения данных логического типа выделяются ячейки длиной 1 байт. В программе записывается: True - истина; False - ложь. * *

№ слайда 10 * Строковый тип (относится к структурным) String Для хранения данных типа Str
Описание слайда:

* Строковый тип (относится к структурным) String Для хранения данных типа String отводятся ячейки длиной 256 байт. 1-й байт содержит признак строки, поэтому длина строки не должна превышать 255 символов. В программе записывается, как последовательность символов, заключенных в апострофы. Пример: S:=’информатика’; Задачи 1.К какому типу в Паскале относятся следующие последовательности символов? а) –123; б) 0.003; в) ’d’; г)’1.245’; д) ’Учебник по информатике’; е) True 2.Как хранится в памяти компьютера следующая последовательность символов? а)12; б)-34.02; в) ’s’ Сколько байт выделяется для хранения? Почему? * *

№ слайда 11 * Выражения определяют действия и порядок их выполнения при вычислении значен
Описание слайда:

* Выражения определяют действия и порядок их выполнения при вычислении значений Выражения в Паскале формируются из следующих элементов: Константы – это величины, которые в ходе выполнения программы не изменяют свое значение. Они могут задаваться: - в явном виде и тогда их вид определяет тип константы Примеры: 17 - Integer; 3.14 - Real; ’h’ - Char; ’Tyrbo Pascal’ - String; True - Boolean в виде именованной константы, тогда имя константы должно быть описано и указано ее значение. Примеры: С1=17; С2=3.14; С3=’h’; *

№ слайда 12 * Переменные используются для обозначения величин, которые изменяются в ходе
Описание слайда:

* Переменные используются для обозначения величин, которые изменяются в ходе выполнения программы. Для обозначения переменных используются имена (идентификаторы). В качестве имен можно использовать последовательность латинских букв, цифр, знак подчеркивания. Имена должны начинаться с буквы Примеры: Мах Summa_1 Y_1 Переменные разделяются на простые и структурированные. У простых переменных одному имени, в любой момент выполнения программы, соответствует только одно значение. У структурированных переменных, одному имени соответствует совокупность значений. Пример структурированной переменной – таблица. *

№ слайда 13 * Стандартные функции служат для облегчения записи и обращения к наиболее час
Описание слайда:

* Стандартные функции служат для облегчения записи и обращения к наиболее часто используемым функциям обработки данных. * Имя функции Действие Тип аргумента Тип результата (значение функции) Арифметические функции PI Real ABS(X) |X| Integer Real Integer Real SQR(X) X2 Integer Real Integer Real SIN(X) Sin x Integer Real Real COS(X) Cos x Integer Real Real EXP(X) Ex Integer Real Real LN(X) Ln x Integer Real Real SQRT(X) Integer Real Real ARCTAN(X) Arctg x Integer Real Real

№ слайда 14 * * ORD(X)	Преобразует любой порядковый тип в целый (можно узнать ASCII-коды
Описание слайда:

* * ORD(X) Преобразует любой порядковый тип в целый (можно узнать ASCII-коды символов) Любой порядковый тип Integer CHR(X) Преобразует ASCII-коды в символ Integer Char ROUND(X) Округление до ближайшего целого Real Longint TRUNG(X) Целая часть числа Real Longint Функции для величин порядкового типа PRED(X) Определение предыдущего значения Любой порядковый тип Значение функции того же типа, что и аргумент SUCC(X) Определение следующего значения Любой порядковый тип Значение функции того же типа, что и аргумент ODD(X) Проверяет величину X на нечетность Integer Boolean

№ слайда 15 * * Функции разнообразного назначения			 RANDOM[(X)]	Формирует случайное числ
Описание слайда:

* * Функции разнообразного назначения RANDOM[(X)] Формирует случайное число Word X - параметр, указывающий диапазон значений случайного числа Задан х - Word : 0<=Rez<x Не задан х – Real: 0.0<=Rez<1.0

№ слайда 16 * Арифметические операции * Знак	Операция	Тип операндов	Тип результата +	Слож
Описание слайда:

* Арифметические операции * Знак Операция Тип операндов Тип результата + Сложение Целые Хотя бы один действительный Целый Действительный - Вычитание Целые Хотя бы один действительный Целый Действительный * Умножение Целые Хотя бы один действительный Целый Действительный / Деление Целые или действительные Действительные div Деление целых чисел Целые Целый mod Остаток от деления целых чисел Целые Целый

№ слайда 17 * Операции отношения * Знак	Операция	Тип операндов	Тип результата =	Равно	Люб
Описание слайда:

* Операции отношения * Знак Операция Тип операндов Тип результата = Равно Любой сравнимый тип (оба операнда должны быть одного типа) Логический <> Не равно ----/----- ----/----- > Больше ----/----- ----/----- > Меньше ----/----- ----/----- >= Больше или равно ----/----- ----/----- <= Меньше или равно ----/----- ----/-----

№ слайда 18 * Логические операции Круглые скобки используются для заключения в них части
Описание слайда:

* Логические операции Круглые скобки используются для заключения в них части выражения, значения которой необходимо выполнить в первую очередь * X Y X and Y X or Y X xor Y False False False False False False True False True True True False False True True True True True True False

№ слайда 19 * * Группа	Типы действий	Операции или элементы 1	Вычисления в круглых скобках
Описание слайда:

* * Группа Типы действий Операции или элементы 1 Вычисления в круглых скобках ( ) 2 Вычисление значения функции Функции 3 Операции подобные умножению *, / , div , mod, and 4 Операции типа сложения +, - , or, xor 5 Операции отношения = , <> , < , > , >= , <=, in

№ слайда 20 * Пример: (X&gt;0) and (X3; г)1111; 4.Какие из следующих последовательностей сим
Описание слайда:

* Пример: (X>0) and (X<5) В этом примере сначала выполняются 2 операции сравнения (операции 5-й группы), а затем логическая операция (операция 3 группы). Задачи: 1.Какие из следующих последовательностей символов являются именами (идентификаторами)? а) X; б)x1; в)Max; г)Symma_1; д)Kor 1; е)10_e; ж)Класс; з)R-1; 2.Найти значение функции: а)Ord(’a’); б)Chr(125); в)Round(123.6); г)Trung(34.999); д)Pred(’Z’); е(Succ(1); ж)Odd(13); 3.Найти значение выражения: а)17 Div 5; б)17 Mod 5; в)5>3; г)11<>11; 4.Какие из следующих последовательностей символов, являются выражениями, записанными по правилам Паскаля? К какому типу выражений они относятся? Из каких элементов состоят? а)1; б)2-(Y Mod X)+Sqr(X); в)X2+Y4; г)2xy+15; д)(y>x) or (12=x); е)’11111+2222’; *

№ слайда 21 * Программа состоит из заголовка программы и блока программы Заголовок: Progr
Описание слайда:

* Программа состоит из заголовка программы и блока программы Заголовок: Program <имя программы>; <имя программы> - любой идентификатор. Блок программы: Состоит из 6-ти разделов, 5 из которых служат для описания данных, а 6-ой для описания действий над данными: Раздел описания меток; Раздел определения констант; Раздел описания типов; Раздел описания переменных; Раздел описания процедур и функций; Раздел операторов; В Турбо Паскале порядок следования описательных разделов произвольный, но с обязательным соблюдением правила, что любое имя до его исполнения должно быть описано. Некоторые из описательных разделов могут отсутствовать за ненадобностью. *

№ слайда 22 * В Турбо Паскале в качестве меток разрешается использовать имена (идентифика
Описание слайда:

* В Турбо Паскале в качестве меток разрешается использовать имена (идентификаторы). Метками помечаются те операторы программы, на которые предусмотрена передача управления. Метка, помечающая оператор, отделяется от него двоеточием. Все метки, используемые в разделе операторов, обязательно должны быть описаны в разделе описания меток. Пример: : Label 1,3,15,155,Sum,Max; : 155:A:=25+B; Goto 155; : Те операторы, на которые нет передачи управления, не нужно снабжать метками. Раздел описания меток Label <метки>; *

№ слайда 23 * Раздел определения констант Const ; Пример: Const g=15.37; Max=10000; Str=’
Описание слайда:

* Раздел определения констант Const <записываются имена констант с указанием их значений>; Пример: Const g=15.37; Max=10000; Str=’sss’; Раздел описания переменных Var <записываются имена всех переменных, используемых в программе>; Переменные одного типа можно описать общим списком. Пример1: Описать переменные квадратного уравнения ax2+bx+c=0 Все переменные действительного типа Var A,B,C,D,X1,X2:Real; Пример2: Если в программе используются переменные различных типов, то их разносят по спискам своего типа Var A,B,C,D,X1,X2:Real; I,S,Max:Integer; Str:String; *

№ слайда 24 * Раздел операторов Раздел операторов считается обязательным, он всегда после
Описание слайда:

* Раздел операторов Раздел операторов считается обязательным, он всегда последний. Этот раздел начинается со слова: Begin и заканчивается: End. Внутри записываются операторы. Операторы размещаются в строке произвольно. Но принято соблюдать ступенчатую запись. По назначению операторы можно разбить на следующие группы: 1 группа - из одного оператора присваивания. Служит для вычисления значений выражений и присваивания их переменным 2 группа - операторы ввода-вывода. Служат для обмена информацией между человеком и компьютером 3 группа – операторы обращения к процедуре. Служат для структуризации программы 4 группа – операторы управления ходом выполнения программы. Служат для изменения естественного порядка выполнения программы *

№ слайда 25 * Раздел операторов По составу операторы разделяются на следующие виды: прост
Описание слайда:

* Раздел операторов По составу операторы разделяются на следующие виды: простой оператор (присваивания, ввода-вывода, обращения к процедуре); сложный оператор или структурный – это оператор, который содержит в своем составе другие операторы (операторы цикла, условный оператор, оператор варианта и т.д.); составной оператор – это группа операторов, заключенная в операторные скобки: Begin операторы End; Составной оператор может записываться в тех местах программы, в которых по синтаксическим правилам должен быть записан один оператор. Задачи Описать переменные, которые используются при нахождении площади треугольника по трем сторонам (формула Герона). Описать переменные, которые используются при нахождении расстояния между двумя точками с координатами x1, y1 и x2, y2. *

№ слайда 26 * Линейные программы могут включать в себя операторы присваивания, ввода-выво
Описание слайда:

* Линейные программы могут включать в себя операторы присваивания, ввода-вывода, обращения к процедурам. Оператор присваивания A:=B; А – переменная; В – выражение; Типы переменной А и значение переменной В должны соответствовать друг другу. Если переменная А - целого типа, то выражение В тоже должно иметь значение целого типа. Задачи. 1.Какие из следующих последовательностей символов являются операторами присваивания? а)X:=Y; б)Min=K+1; в)Summa+1:=W; г)S:=S; д)A:=’****’; е)Rrr=125+1*A ж)Str:=’120*Y’; з)T:=5>Y; 2.Пусть значения переменных Х и У равны, соответственно, 3 и –2, какие значения будут иметь эти переменные после выполнения операторов присваивания? а) X:=X+2*Y; Y:=Y/2; в) Y:=-Y; X:=X+Y; Y:=Y+1; г) X:=1; X:=X+Y; д) X:=Y; Y:=X; *

№ слайда 27 * Операторы ввода-вывода В общем случае ввод и вывод значений происходит из ф
Описание слайда:

* Операторы ввода-вывода В общем случае ввод и вывод значений происходит из файлов привязанных к программе. Ввод с клавиатуры и вывод на экран рассматривается в Паскале, как обмен информацией между программой и стандартными файлами с именами Input (клавиатура) и Output (экран), поэтому при вводе с клавиатуры значений и выводе результатов на экран имена этих файлов не указываются. *

№ слайда 28 * Оператор вывода Оператор вывода на экран имеет 3 модификации: Write(B1,B2,…
Описание слайда:

* Оператор вывода Оператор вывода на экран имеет 3 модификации: Write(B1,B2,…,Bn); - где B1,B2,…,Bn – выражения типов: Integer, Char, Real, String, Boolean. При выполнении оператора значения выражений вычисляются и выводятся в одну строку экрана. Значения типа Integer - выводятся в обычной форме в виде целого числа. Значения типа Real – в простейшем случае выводятся в форме с порядком, при этом мантисса содержит 7 цифр. Пример: Write(123.456); на экране – 1.234560Е02 Write(-0.000123); на экране – - 1.230000Е-04 Для удобства восприятия вывода существует возможность задания маски. Она задается в следующем виде: Write(A:N:M); N – целая константа, обозначающая общее число позиций, отводимых под значение A М – целая константа, обозначающая число позиций, отводимых под дробную часть. *

№ слайда 29 * Пример: Write(123.456:10:4); Write(123.456:6:2); Значения типа Char и Strin
Описание слайда:

* Пример: Write(123.456:10:4); Write(123.456:6:2); Значения типа Char и String выводятся в виде одного или последовательности символов. Значения типа Boolean выводятся в виде True или False. При выводе нескольких значений в одну строку возникает потребность отделять их друг от друга с помощью заданного числа пробелов. Для этого можно использовать элемент списка вывода вида - ’ ’:K – где К – коэффициент повторения количества необходимых пробелов Пример: Write(’X1=’,X1:8:3,’ ’:10,’X2=’,X2:8:3); * 1 2 3 . 4 5 6 0 1 7 9 . 5 1

№ слайда 30 * Writeln(B1,B2,…,Bn); Отличается от первого тем, что после вывода последнего
Описание слайда:

* Writeln(B1,B2,…,Bn); Отличается от первого тем, что после вывода последнего значения курсор переводится в начало следующей строки экрана. Writeln; Выводит пустую строку. Задача 1. Вывести на экран фразу – «Моя первая программа» Решение: Program Lin1; Begin Writeln(’Моя первая программа’); End. Задачи: 1.Какие из следующих последовательностей символов являются операторами вывода: а) Write(X,Y); б)Writeln(X:Y:Z); в)Writeln г) Write(’Xx’,Xx,’Yy’,Yy); д)Writeln(1+2,3+4,Y/X); е) Writeln(’1+2’,’3+4’,’Y/X’); ж)Writeln(X:=Y,Z); 2.Создать на экране рисунок (использовать любые символы). * Оператор ввода назад

№ слайда 31 * Оператор ввода * назад
Описание слайда:

* Оператор ввода * назад

№ слайда 32 * Задача . Составить программу – «Диалог с компьютером» Решение: Program Lin2
Описание слайда:

* Задача . Составить программу – «Диалог с компьютером» Решение: Program Lin2; Var A:String; Begin Writeln(’Я компьютер, а как зовут тебя?’); Readln(A); Writeln(’Очень приятно, ’,A ); End. *

№ слайда 33 * Задача 3. Даны числа A,B,C. Переприсвоить их значения следующим образом: A
Описание слайда:

* Задача 3. Даны числа A,B,C. Переприсвоить их значения следующим образом: A B C Исходные данные: A=10, B=15, C=20 Pезультат: A=20, B=10, C=15 Решение: Program Lin3; Var A,B,C,D:Integer; Begin Writeln(’Введите значения переменных A, B, C’); Read(A,B,C); D:=C; C:=B; B:=A; A:=D; Writeln(’A=’,A,’B=’,B,’C=’,C); End. * задачи

№ слайда 34 * Задачи: Какие из следующих последовательностей символов являются операторам
Описание слайда:

* Задачи: Какие из следующих последовательностей символов являются операторами ввода: а) Write(X,Y); б) Readln(X+Y,Y); в)Read(X,Y); г)Read(’Xx’,Xx,’Yy’,Yy)? Даны числа A,B,C,D. Переприсвоить их значения следующим образом: A B C D (составить программу). 3. Какие числа будут выведены в результате выполнения последовательности операторов: Read(X); X:=X Mod 2; X:=Sqrt(X+1); Write(X,X*2); если в качестве исходного данного использовалось число: а) 2; б)1.2; в)6; г)5.4? 4. Вычислить расстояние между двумя точками с данными координатами X1,Y1 и X2,Y2. 5. На предприятии 2-м рабочим выделена премия (N руб). Разделить эту премию между рабочими в зависимости от стажа их работы на предприятии (прямо пропорциональная зависимость). Стаж вводится с клавиатуры. 6. По стороне основания и боковому ребру определить полную площадь поверхности правильной призмы: а) треугольной; б) четырехугольной; в)шестиугольной. 7. Продолжить программу –«Диалог с компьютером». 8. Дано целое число А. Не используя никаких функций и никаких операций кроме умножения получить: а) А8 за три операции; б) А10 за четыре операции; в) А7 за четыре операции; 9. Дано число Х. Вычислить выражение 2х4-3х3+4х2-5х+6.Позаботиться об экономии операций. * назад

№ слайда 35 * Для организации разветвления в программе, в Паскале используются следующие
Описание слайда:

* Для организации разветвления в программе, в Паскале используются следующие операторы: Условный оператор. Оператор варианта. Оператор перехода Условный оператор Условный оператор имеет вид: If Q Then B1 [Else B2]; Блок-схема: B1 (Else) - +(Then) Q - выражение, принимающее логическое значение; B1, B2 – любые операторы, в единственном числе; Выполняются: Вычисляется выражение Q, которое имеет логическое значение. Если это значение True, то выполняется оператор B1. Если же Q имеет значение False, то в случае полной формы условного оператора выполняется оператор B1 , а в случае неполной формы управление передается следующему оператору программы. * * пример

№ слайда 36 * Задача: Даны 2 различных числа. Найти максимальное из этих чисел. Пример: И
Описание слайда:

* Задача: Даны 2 различных числа. Найти максимальное из этих чисел. Пример: Исходные данные: A=10, C=15 Результат: Максимальное число =15 Решение: Program Vet1; Var A,C,Max:Integer; Begin Writeln(’Введите 2 различных числа’); Readln(A,C); If A>C Then Max:=A Else Max:=C; Write(’Максимальное число = ’,Max); End. * Для самостоятельной работы

№ слайда 37 * Задачи: 1. Даны 2 числа. Вывести первое число, если оно больше второго и об
Описание слайда:

* Задачи: 1. Даны 2 числа. Вывести первое число, если оно больше второго и оба числа, если это не так. 2. Даны 2 различных числа. Найти C=Max/Min. 3. Составить программу вычисления значения Y по введенному значению X. Y= (X+2)2 , X>=0 X-2 ,X<0 4. Даны числа А, B, Х. Составить программу вычисления значения Y. (X+2)2 , X<A Y= X-2 ,A<=X<=B 2*X ,X>B 5. Даны 3 различных числа. Найти максимальное из этих чисел. 6. Даны 3 числа. Определить сколько среди них нулей. 7. Даны 3 числа. Определить сколько среди них отрицательных и сколько положительных чисел. * * Составной оператор

№ слайда 38 * Если по смыслу задачи, в зависимости от условий, надо выполнять либо одну,
Описание слайда:

* Если по смыслу задачи, в зависимости от условий, надо выполнять либо одну, либо другую группу операторов, то их надо превратить в один составной оператор (заключить в операторные скобки): Задача : Даны 2 различных числа. Вычислить x=(y+z)2; - где y=max*2; z=max/min; Решение: Program Vet2; Var A,C,Max,Y:Integer; Z,X:Real; Begin Writeln(’Введите 2 различных числа’); Readln(A,C); If A>C Then Begin Y:=A*2; Z:=A/C; End Else Begin Y:=C*2; Z:=C/A; End; X:=SQR(Y+Z); Write(’X = ’,X); End. * * задача

№ слайда 39 * Задача . Даны числа A, C. Решить линейное уравнение A*X=C с полным анализом
Описание слайда:

* Задача . Даны числа A, C. Решить линейное уравнение A*X=C с полным анализом. Решение: Program Vet3; Var A,C,X:Real; Begin Writeln(’Введите 2 числа’); Readln(A,C); If A=0 Then If B=0 Then Writeln(’X -любое’) Else Writeln(’Решений нет’) Else Begin X:=C/A; Writeln(’X=’,X); End; End. * * Для самостоятельной работы

№ слайда 40 * Задачи: Даны X,Y (ХY). Меньшее из этих двух чисел заменить полусуммой, а бо
Описание слайда:

* Задачи: Даны X,Y (Х<>Y). Меньшее из этих двух чисел заменить полусуммой, а большее их удвоенным произведением Даны числа A, B, C. Решить уравнение AX2+BX+C=0 с полным анализом. Даны 3 числа. Найти разность большего и меньшего из этих чисел Если сумма трех различных чисел X,Y,Z меньше единицы, то меньшее из X,Y заменить полусуммой Y и Z, иначе большее из X и Y заменить произведением Х*Y. * * Логические условия

№ слайда 41 * (связки “и”; “или”). При записи составных логических условий следует помнит
Описание слайда:

* (связки “и”; “или”). При записи составных логических условий следует помнить порядок выполнения операций. Задача . Даны числа X,Y,Z. Проверить, можно ли построить треугольник с данными сторонами. Решение: Program Vet3; Var X,Y,Z:Integer; Begin Writeln(’Введите 3 числа’); Readln(X,Y,Z); If (X+Y>Z) and (X+Z>Y) and (Y+Z>X) Then Writeln(’Треугольник существует.’) Else Writeln(’Треугольник не существует.’); End. * * задачи

№ слайда 42 * Задачи Даны числа А, В, С. Определить есть ли среди них отрицательные числа
Описание слайда:

* Задачи Даны числа А, В, С. Определить есть ли среди них отрицательные числа. По введенной температуре определить здоров человек или болен. Даны числа А, В, С. Определить какое из чисел лежит между двумя другими Даны числа А, В, С. Вывести их на экран упорядоченными по возрастанию. * *

№ слайда 43 * Case B of :S1; :S2; : :Sn; [Else S;] End; S1, S2,…, Sn – любые операторы в
Описание слайда:

* Case B of <список меток 1>:S1; <список меток 2>:S2; : <список меток n>:Sn; [Else S;] End; S1, S2,…, Sn – любые операторы в единственном числе; B – выражение, дающее значение порядкового типа, оно называется переключателем; <список меток n> - это перечень констант того же типа, что и значение переключателя B. Разделяются запятой или (..). Примеры: 1..50; 1,2,4; ’a’,’d’; Выполняется: Вычисляется значение переключателя B; Отыскивается список меток, включающий это значение и выполняется соответствующий оператор; Если значение переключателя не входит ни в один из списков меток, то в случае полной формы операторa Case, выполняется оператор S, а в случае неполной формы управление передается следующему оператору программы. Здесь перед Else (;) ставится. задачи * *

№ слайда 44 * Задача : По номеру дня недели вывести соответствующее ему название. Решение
Описание слайда:

* Задача : По номеру дня недели вывести соответствующее ему название. Решение: Program Vet4; Var Z:Integer; Begin Writeln(’Введите номер дня недели’); Readln(Z); Case Z of 1:Writeln(’Понедельник’); 2:Writeln(’Вторник’); 3:Writeln(’Среда’); 4:Writeln(’Четверг’); 5:Writeln(’Пятница’); 6:Writeln(’Суббота’); 7:Writeln(’Воскресенье’); Else Writeln(’Дня с таким номером не существует.’); End; End. задача * *

№ слайда 45 * Задача : По заданному символу определить, является ли он цифрой, латинской
Описание слайда:

* Задача : По заданному символу определить, является ли он цифрой, латинской буквой или другим знаком. Решение: Program Vet5; Var Z:Char; Begin Writeln(’Введите символ’); Readln(Z); Case Z of ’1’,’2’,’3’,’4’,’5’,’6’,’7’,’8’,’9’,’0’:Writeln(’Символ - цифра’); ’a’..’z’:Writeln(’Символ – латинская буква’); Else Writeln(’Другой знак.’); End; End. Задачи для самостоятельной работы: Определить по введенному номеру месяца, количество дней в нем. Определить, принадлежит ли введенное целое число к десяткам, сотням или тысячам. По номеру квартала определить принадлежащие ему названия месяцев. По номеру четверти координатной плоскости вывести знаки Х и У. * *

№ слайда 46 * Оператор перехода имеет вид: Goto M; M- метка. Все метки должны быть описан
Описание слайда:

* Оператор перехода имеет вид: Goto M; M- метка. Все метки должны быть описаны в разделе описания меток; В рассмотренных выше программах операторы выполнялись в том порядке, в каком они были записаны. Изменить этот порядок можно с помощью оператора перехода. Он прерывает естественную последовательность операторов: следом за ним выполняется оператор, помеченный указанной меткой. Оператор Goto Met; передает управление на оператор с меткой Met. Пусть программа содержит последовательность операторов: X:=2; A:=X; Goto Met; 1:A:=A*2; B:=A; Met:Writeln(B); В этом случае сначала выполняются операторы X:=2; A:=X; затем следует переход к оператору, помеченному меткой Met т.е. к оператору Writeln(B); задача * *

№ слайда 47 * Задача Даны 3 отрицательных числа. Найти предыдущее и следующее значение ма
Описание слайда:

* Задача Даны 3 отрицательных числа. Найти предыдущее и следующее значение максимального из этих чисел. Решение: Program Vet6; Label 1; Var A,B,C:Integer; Begin 1:Writeln(’Введите отрицательные числа’); Readln(A,B,C); If (A>0) or (B>0) or (C>0) Then Goto 1; {далее задачу решаем самостоятельно} End; * *

№ слайда 48 * В Паскале существуют 3 оператора цикла: Цикл с постусловием («До») Оператор
Описание слайда:

* В Паскале существуют 3 оператора цикла: Цикл с постусловием («До») Оператор цикла с предусловием «Пока» Цикл с параметром *

№ слайда 49 * N Mk; M1; M2; Repeat M1; M2; : Mk; Until N; Блок - схема : : - Repeat – пов
Описание слайда:

* N Mk; M1; M2; Repeat M1; M2; : Mk; Until N; Блок - схема : : - Repeat – повторять; Until – до; M1, M2,…, Mk – группа операторов, они называются операторами тела цикла. N – выражение, имеющее логическое значение (условие выхода из цикла) Выполняется: Выполняются операторы M1, M2,…, Mk; Вычисляется значение N; Если N – True, то оператор цикла заканчивает свою работу, иначе перейти к пункту 1 Среди операторов тела цикла обязательно должен присутствовать оператор, изменяющий значение выражения N; задача * *

№ слайда 50 * Задача . Найти произведение чисел от 1 до 10. Решение: Program Ci1; Var K:I
Описание слайда:

* Задача . Найти произведение чисел от 1 до 10. Решение: Program Ci1; Var K:Integer; P:Real; Begin K:=0;P:=1; Repeat K:=K+1; P:=P*K; Until K=10; Writeln(’P= ’,P:10:5); End. Задачи для самостоятельного решения: Даны числа от 1 до N. Найти: а) сумму всех чисел; б) произведение всех чисел; в) среднее арифметическое. Вычислить сумму всех двузначных чисел. Вычислить сумму чисел: S=1+3+5+…+R где R-нечетное. Вычислить произведение чисел: P=2+4+6+…+R где R-четное. Найти значения функции y=x2 при х=1,3,5,…,15. Найти значения функции р=(р2+15) при р=2,4,6,…,20. *

№ слайда 51 While – пока; Do – выполнять; N – выражение, имеющее логическое значение (усл
Описание слайда:

While – пока; Do – выполнять; N – выражение, имеющее логическое значение (условие входа в цикл); M – любой оператор в единственном числе. Если по смыслу задачи надо повторять группу операторов, то их надо превратить в один составной оператор (заключить в операторные скобки). Этот оператор или группа операторов называется телом цикла; Выполняется: Вычисляется значение N; Если N – True, то выполняется оператор M (группа операторов), иначе оператор цикла заканчивает свою работу; Перейти к пункту 1. Среди операторов тела цикла обязательно должен присутствовать оператор, изменяющий значение выражения N; * While N do M; M задача * *

№ слайда 52 * Задача . Даны числа от 1 до N (N – четное). Найти: S= Решение: Program Ci2;
Описание слайда:

* Задача . Даны числа от 1 до N (N – четное). Найти: S= Решение: Program Ci2; Var K,N:Integer; S:Real; Begin Writeln(’Введите четное число’); Readln(N); K:=0;S:=0; While K<N do Begin K:=K+2; S:=S+1/K; End; Writeln(’S= ’,S); End. Сам работа *

№ слайда 53 * Задачи: 1. Даны числа от 1 до N. Найти: Р= 2. Даны числа от 1 до N (N – неч
Описание слайда:

* Задачи: 1. Даны числа от 1 до N. Найти: Р= 2. Даны числа от 1 до N (N – нечетное). Найти: S= 3. Найти значение Х: Х=(1*3*5*…*N)/(1+3+5+…+N) (N – нечетное). 4. Даны числа от 1 до N. Вычислять: S= вплоть до слагаемого, меньшего заданного Е (Е<1). 5. Вычислить среднее арифметическое чисел K,K+1,K+2,…,K+N; (K<N). 6. Вычислить сумму чисел: S=N+(N+1)+(N+2)+(N+3)+…+(N+R); (N<R). 7.Вычислить произведение чисел: P=N*(N+1)*(N+2)*(N+3)*…*(N+R); (N<R). 8 .Вычислить: P=1+(1*2)+(1*2*3)+(1*2*3*…*R). 9. Найти значения функции M=N2-N при N={2,4,6,…,T} (T-четное). 10. Найти значения функции X=Y2*(Y2-Y)/Y при Y={N,N*1,N*2,…,N*M} (N<M). *

№ слайда 54 * Оператор цикла с параметром имеет 2 модификации: For K:=N1 to N2 do M; (с в
Описание слайда:

* Оператор цикла с параметром имеет 2 модификации: For K:=N1 to N2 do M; (с возрастанием параметра) For K:=N1 downto N2 do M; (с убыванием параметра) For – для; To – до; Downto – уменьшая до; K – переменная порядкового типа (Integer, Char, Boolean), называется параметром цикла; N1, N2 – выражение, имеющее значение того же типа, что и параметр K; M – любой оператор в единственном числе; Если по смыслу задачи надо повторять группу операторов, то их надо превратить в один составной оператор (заключить в операторные скобки): Выполняется: Вычисляется значение N1, N2; K:=N1; Проверяется условие: K<=N2 (to) K>=N2 (downto) Если условие не выполнено, то выполнение оператора цикла заканчивается. Иначе выполняется оператор M; K – получает приращение: K:=succ(K) (to); K:=pred(K) (downto); Переход к пункту 3; задачи * *

№ слайда 55 * Задача . Вывести коды всех строчных символов латинского алфавита. Решение:
Описание слайда:

* Задача . Вывести коды всех строчных символов латинского алфавита. Решение: Program Ci3; Var S:Char; Begin For S:=’a’ to ’z’ do Writeln(’У символа - ’,S,’ код ’,Ord(S)); End. Задача . Вывести на экран цифры в обратной последовательности Решение: Program Ci4; Var R:Integer; Begin For R:=9 downto 1 do Write(R,’ ’:4); End. Задача Вывести на экран 10 случайных чисел в диапазоне от 0 до 100. Решение: Program Ci4; Const X=100; Var Y,R:Integer; Begin Randomize; {инициализирует генератор случайных чисел} For R:=1 to 10 do Begin Y:=Random(X); Writeln(R,’=’,Y); End; End. *

№ слайда 56 * Таблицы и табличные величины Описание массива (в разделе Var ) Одномерные м
Описание слайда:

* Таблицы и табличные величины Описание массива (в разделе Var ) Одномерные массивы Нахождение максимального элемента массива Сортировка одномерного массива Решение задач, используя одномерные массивы. Двумерные массивы *

№ слайда 57 * При решении задач человек очень часто пользуется таблицами. При записи исхо
Описание слайда:

* При решении задач человек очень часто пользуется таблицами. При записи исходных данных, получении справочной информации и т.п. Таблицы бывают разные, но наиболее часто встречающиеся линейные и прямоугольные таблицы. Каждая таблица имеет свое название. Значения, образующие линейную таблицу, располагаются при записи на бумаге в строку или в столбец. Каждому значению или элементу таблицы, соответствует его порядковый номер (индекс), и наоборот: стоит задать порядковый номер (индекс), и сразу ясно, о каком элементе таблицы идет речь. Пример: На метеостанции каждый час измеряется температура воздуха и значения измерений за сутки записываются в таблицу: Temp - название таблицы. Эта линейная таблица содержит 24 элемента, занумерованные от 1 до 24. Например, второй элемент таблицы имеет значение – 13, а пятый – значение 10. Для прямоугольной таблицы должны быть указаны границы индексов, как по вертикали, так и по горизонтали (строки и столбцы). Каждому значению или элементу прямоугольной таблицы соответствует определенный индекс строки и столбца. Элементы таблицы могут быть любого типа (числовые, символьные, строковые и т.д.). пример * Время измерения, ч 1 2 3 4 5 6 ……… 23 24 Температура, С 12 13 11 15 10 12 11 11

№ слайда 58 * Пример: Составим таблицу размещения пассажиров в первых 6-ти вагонах на мес
Описание слайда:

* Пример: Составим таблицу размещения пассажиров в первых 6-ти вагонах на местах с 15 по 19 (элементами таблицы будут имена пассажиров). Vagon Например, элемент таблицы, стоящий в строке с индексом 17 и в столбце – 1 вагон, имеет значение – Вася. * 1 вагон 2 вагон 3 вагон 4 вагон 5 вагон 6 вагон 15 Катя Наташа Юля Римма Рома Лиля 16 Олег Марат Ирек Адель Петя Эльвина 17 Вася Таня Люба Костя Луиза Лиза 18 Лена Иля Наташа Артур Рустем Руслан 19 Коля Мансур Антон Саша Раиль Марат

№ слайда 59 * В Турбо Паскале существует возможность работы с таблицами, они имеют назван
Описание слайда:

* В Турбо Паскале существует возможность работы с таблицами, они имеют название - массивы. Массив – это совокупность элементов одного типа, объединенных под общим именем. Каждый элемент массива имеет свой индекс (порядковый номер), который определяет его относительную позицию. Число элементов массива задается при описании и в дальнейшем не изменяется. Массив объявляется в следующей форме: A:Array[B1,B2,…,Bn] of M; Array – массив; Of – из; Здесь - имя массива (правильный идентификатор); B1, B2,…,Bn – списки индексных типов, их можно задавать, указав любой перечисляемый тип (кроме Longint) Количество списков (n) определяет размерность массива, они разделяются запятыми и заключаются в квадратные скобки; M - тип элементов, любой тип Турбо Паскаля; Доступ к каждому элементу массива в программе осуществляется с помощью индекса - целого числа (точнее, выражения порядкового типа). При упоминании в программе любого элемента массива сразу за именем массива должен следовать индекс элемента в квадратных скобках. *

№ слайда 60 * Рассмотрим работу с одномерными массивами (в алгебре они называются вектора
Описание слайда:

* Рассмотрим работу с одномерными массивами (в алгебре они называются векторами): Дадим таблице имя - Tab Каждое число в таблице имеет тип Integer. Это - тип злементов (M). Индексы данной таблицы изменяются от 1 до 8 . У одномерных массивов один список (B1). Таким образом, описание этого массива (в разделе Var) выглядит так: Tab:Array[1..8] of Integer; Задав конкретные значения индексов, можно выбрать определенный элемент массива. Например, оператор: N:=A[5]; Присвоит переменной N значение элемента массива, имеющего индекс 5, т.е. число 11. задача * 1 2 3 4 5 6 7 8 15 20 33 13 11 4 12 8

№ слайда 61 * Задача Задан одномерный массив из N чисел. Изменить все элементы массива, у
Описание слайда:

* Задача Задан одномерный массив из N чисел. Изменить все элементы массива, увеличив их на единицу. Работу с массивом можно разделить на 4 этапа: Описание массива (выделить место в памяти компьютера для данного массива); Ввод элементов массива (с клавиатуры; с помощью оператора присваивания; с помощью функции Random); Работа с массивом (изменить элементы массива в соответствии с заданием); Вывод массива (на экран или принтер); Последовательный доступ к каждому элементу массива удобно осуществлять в цикле. решение *

№ слайда 62 * Решение: Program Mass1; {1}Var Tab:Array[1..10] of Integer; I,N:Integer; Be
Описание слайда:

* Решение: Program Mass1; {1}Var Tab:Array[1..10] of Integer; I,N:Integer; Begin Writeln(’Введите число элементов массива (N<=10)’); Readln(N); {2}For I:=1 to N do Readln(Tab[I]);{ввод элементов с клавиатуры} {3}For I:=1 to N do Tab[I]:= Tab[I]+1; {4}For I:=1 to N do Writeln(’Tab[’,I,’]=’,Tab[I]); End. Задачи для самостоятельного решения *

№ слайда 63 * Задачи для самостоятельного решения: Задан одномерный массив из N чисел. Из
Описание слайда:

* Задачи для самостоятельного решения: Задан одномерный массив из N чисел. Изменить значения элементов массива: а) все уменьшить на 100; б)если элемент больше 100 – на 100; в) если элемент отрицательный – на квадрат. Задан одномерный массив из N чисел. Сосчитать количество элементов массива: а) положительных; б) отрицательных; в) нулевых. Заполнить одномерный массив элементами, значения которых равны их удвоенным порядковым номерам. Задан одномерный массив из N чисел. Найти те элементы, значения которых совпадают с их индексом. Задан одномерный массив из N чисел. Сосчитать: сумму, произведение и среднее арифметическое всех элементов массива. Задан одномерный массив из N чисел. Определить сумму положительных и отрицательных элементов массива. Задан одномерный массив А из N чисел. Создать новый массив путем деления всех элементов массива А на число Х. *

№ слайда 64 * Задача . Задан одномерный массив из N чисел. Найти максимальный элемент мас
Описание слайда:

* Задача . Задан одномерный массив из N чисел. Найти максимальный элемент массива. Решение: Program Mass2; Const X=100; Var A:Array[1..10] of Integer; I,N,Max:Integer; Begin Writeln(’Введите число элементов массива (N<=10)’); Readln(N); Randomize; For I:=1 to N do A[I]:=Random(X);{заполнение массива случайными числами} Max:=A[1]; For I:=1 to N do If Max>A[I] Then A[I]:=Max; For I:=1 to N do Writeln(’A[’,I,’]=’,A[I]); Writeln(’Max=’,Max); End. Задачи для сам работы *

№ слайда 65 * Задачи: Задан одномерный массив из N чисел. Найти минимальный элемент масси
Описание слайда:

* Задачи: Задан одномерный массив из N чисел. Найти минимальный элемент массива. Задан одномерный массив из N чисел. Найти разницу между наибольшим и наименьшим элементами массива. Задан одномерный массив из N чисел. Проверить, есть ли в массиве отрицательные элементы и если есть, то найти среди них наименьший. *

№ слайда 66 * Задача . Задан одномерный массив из N чисел. Отсортировать все элементы мас
Описание слайда:

* Задача . Задан одномерный массив из N чисел. Отсортировать все элементы массива по возрастанию. Решение: Program Mass3; Var A:Array[1..10] of Integer; I,P,N:Integer; F:boolean; Begin Writeln(’Введите число элементов массива (N<=10)’); Readln(N); For I:=1 to N do Readln(A[I]); F:=False; While F=False do Begin F:=True; For I:=1 to N-1 do If A[I]>A[I+1] Then Begin P:=A[I]; A[I]:=A[I+1]; A[I+1]:=P; F:=False; End; End; For I:=1 to N do Writeln(’A[’,I,’]=’,A[I]); End. * самостоятельная работа

№ слайда 67 * Задачи: Задан одномерный массив из N строк, имеющих вид фамилий. Отсортиров
Описание слайда:

* Задачи: Задан одномерный массив из N строк, имеющих вид фамилий. Отсортировать все элементы массива по алфавиту. В массиве каждый элемент равен 0, 1 или 2. Переставить элементы массива так, чтобы вначале массива расположились все нули, затем все единицы и, наконец все двойки. Задан одномерный массив из N чисел. Переставить элементы массива так, чтобы отрицательные элементы предшествовали всем неотрицательным. Задан одномерный массив из N чисел и число В. Упорядочить массив по возрастанию и поместить переменную В в соответствующее место массива. *

№ слайда 68 * Задан одномерный массив из N чисел. Составить новый массив, состоящий из те
Описание слайда:

* Задан одномерный массив из N чисел. Составить новый массив, состоящий из тех же чисел, но идущий в обратном порядке. Задан одномерный массив из N чисел и число К. Напечатать «Да», если К совпадает хотя бы с одним из элементов массива и «Нет» в противном случае. Задан одномерный массив из N чисел. Найти количество элементов массива, больших среднего арифметического всех его элементов. Задан одномерный массив из N чисел Определить в массиве число соседств из двух чисел одного знака. Задан одномерный массив из N чисел Найти сумму произведений всех троек соседних чисел. Задан одномерный массив из N чисел. Подсчитать наибольшее число одинаковых элементов, идущих в массиве подряд. Задан одномерный массив из N чисел. Заменить все элементы массива на сумму предыдущего и последующего их значений. Задан одномерный массив из N чисел. Подсчитать количество неповторяющихся элементов массива. Задан одномерный массив из N чисел. Составить массив У, где Y[I]:=Min(X[1],X[2],…,X[N]). *

№ слайда 69 * Рассмотрим работу с двумерными массивами (в алгебре они называются матрицам
Описание слайда:

* Рассмотрим работу с двумерными массивами (в алгебре они называются матрицами): Дадим таблице имя - Tab Каждое число в таблице имеет тип Integer. Это - тип злементов (M). У двумерных массивов два списка (B1,B2). Таким образом, описание этого массива (в разделе Var) выглядит так : Tab:Array[1..3,1..4] of Integer; Задав конкретные значения индексов, можно выбрать определенный элемент массива. Например оператор: N:=A[1,3]; Присвоит переменной N значение элемента массива, имеющего индекс строки 1, индекс столбца 3, т.е. число 15. Задача 1. Задан массив из целых чисел, размерностьюN*M (N-строки, M-столбцы). Вывести на экран: а) N-ю строку; б) M-й столбец; в) весь массив. Задача 2. Задан массив из строк, размерностьюN*M (N-строки, M-столбцы). Отсортировать все элементы массива по возрастанию. решение * 1 2 3 4 1 20 33 15 11 2 11 -1 4 7 3 5 0 3 6

№ слайда 70 * Задача 1. Задан массив из целых чисел, размерностьюN*M (N-строки, M-столбцы
Описание слайда:

* Задача 1. Задан массив из целых чисел, размерностьюN*M (N-строки, M-столбцы). Вывести на экран: а) N-ю строку; б) M-й столбец; в) весь массив. Решение: Program Mass4; Var Tab:Array[1..10,1..10] of Integer; N,M,X,Y:Integer; Begin Writeln(’Введите количество строк массива (N<=10)’); Readln(N); Writeln(’Введите количество столбцов массива (M<=10)’); Readln(M); For X:=1 to N do For Y:=1 to M do Readln(Tab[X,Y]); Writeln(’Вывод ’,N,’ строки’); For X:=1 to M do Write(’Tab[’,N,’,’,X,’]=’,Tab[N,X],’ ’:2); Writeln; Writeln(’Вывод ’,M,’ столбца’); For X:=1 to N do Writeln(’Tab[’,X,’,’,M,’]=’,Tab[X,M]); Writeln(’Вывод массива’); For X:=1 to N do Begin For Y:=1 to M do Write(’Tab[’,X,’,’,Y,’]=’,Tab[X,Y],’ ’:2); Writeln; End; end. * Задача 2

№ слайда 71 * Задача 2. Задан массив из строк, размерностьюN*M (N-строки, M-столбцы). Отс
Описание слайда:

* Задача 2. Задан массив из строк, размерностьюN*M (N-строки, M-столбцы). Отсортировать все элементы массива по возрастанию. Решение: Program Mass5; Var A:Array[1..10,1..10] of String; I,N,M,X,Y:Integer; P:String; F:boolean; Begin {Ввести двумерный массив} F:=False; While F=False do Begin F:=True; For X:=1 to N  do For Y:=1 to M-1 do Begin If A[X,Y]>A[X,Y+1] Then Begin {Поменять местами 2 соседних элемента строки} End; If (X<N)and(Y=(M-1))and(A[X,Y+1]>A[X+1,1])Then Begin P:=A[X,Y+1]; A[X,Y+1]:=A[X+1,1]; A[X+1,1]:=P; F:=False; End; End; End; {Вывести отсортированный массив} End. *

№ слайда 72 * При решении многих задач возникает необходимость проведения одних и тех же
Описание слайда:

* При решении многих задач возникает необходимость проведения одних и тех же вычислений на различных этапах решения задачи и при различных значениях исходных данных. 1 2 Т1 РР Т2 РР Т3 РР Т4 РР Т1 Т2 Т3 Т4 При составлении программы по первому алгоритму приходится задавать одну и ту же группу операторов (РР) для каждого из повторяющихся фрагментов. Для сокращения текста программы в Паскале введено понятие подпрограммы, при этом повторяющаяся группа операторов записывается отдельно (второй алгоритм) один раз по отношению к некоторым формальным параметрам, а в соответствующих местах программы помещается лишь обращение к подпрограмме с указанием нужных в данный момент фактических параметров. * *

№ слайда 73 * Использование подпрограмм позволяет применять принципы структурного програм
Описание слайда:

* Использование подпрограмм позволяет применять принципы структурного программирования, когда исходная задача разбивается на группы простых подзадач, каждая подзадача программируется отдельно, а программа исходной задачи составляется только из обращений к программам подзадач. Кроме того, использование подзадач позволяет вводить в новую программу, программы составленные ранее. В Паскале подпрограммы реализуются 2-х видов - процедуры и функции. И те, и другие вводятся в программу с помощью описания. Для этого существует специальный раздел программы Описание процедур Обращение к процедуре Формальные параметры – переменные Формальные параметры – значения Описание функций *

№ слайда 74 * Структура описания процедур аналогична самой программе. Она состоит из заго
Описание слайда:

* Структура описания процедур аналогична самой программе. Она состоит из заголовка процедуры и блока процедуры. Блок процедуры включает в себя те же 6 разделов, что и блок программы. Заголовок процедуры: Procedure Xxx[(P1:T1;P2:T2;…Pn:Tm)]; Xxx - имя процедуры (любой идентификатор); P1,P2,…,Pn - формальные параметры; T1,T2,…,Tm – типы формальных параметров Формальные параметры – это перечень имен для обозначения исходных данных и результатов работы процедуры. Формальные параметры нужны для того, чтобы указать, куда должны быть подставлены фактические параметры при обращении к процедуре. Формальные параметры в программе не описываются. Формальные параметры могут отсутствовать и, в этом случае, процедура описывается без параметров. * назад

№ слайда 75 * Чтобы исполнить процедуру, в нужном месте программы записывается оператор о
Описание слайда:

* Чтобы исполнить процедуру, в нужном месте программы записывается оператор обращения к ней, который имеет вид: Xxx[(B1,B2,…,Bn)]; B1,B2,…,Bn – список фактических параметров. Он отсутствует, если процедура описывалась без параметров. При вызове процедуры устанавливается взаимное однозначное соответствие между фактическими и формальными параметрами, а затем управление передается процедуре. Соответствие между фактическими и формальными параметрами: Число фактических параметров должно быть равно числу формальных параметров; Соответствующие фактические и формальные параметры должны совпадать по порядку следования и по типу. * назад

№ слайда 76 * Перед ними ставится слово Var. Для формального параметра – переменной испол
Описание слайда:

* Перед ними ставится слово Var. Для формального параметра – переменной используется именно та ячейка, которая содержит соответствующий фактический параметр и поэтому результаты работы процедуры могут быть переданы в программу только через параметр – переменную. В фактических параметрах – переменных допускается использовать только переменные. Пример 1: : Procedure Xxx(Var A,B,C:Integer; Var D:Real);{A,B,C,D – формальные параметры – переменные; } : Xxx(M,N,X,Y);{M,N,X,Y – переменные} Рассмотрим на примере принцип работы параметров-переменных: Пример 2: Program Pr1; Var A,B:Integer; Procedure Zamena(Var Y,X:Integer); Begin X:=X+1;Y:=Y+10; End; Begin A:=0;B:=0; Zamena(A,B); Writeln(A,B); End. Результат: 1,10 {Результат работы процедуры передается в программу – переменные А и В изменили свое значение} * назад

№ слайда 77 * Задача. Составить программу вычисления максимального из 4-х чисел, использу
Описание слайда:

* Задача. Составить программу вычисления максимального из 4-х чисел, используя процедуру вычисления максимального из 2-х чисел. Решение: Program Pr3; Var A,B,C,D,M1,M2,M3:Integer; Procedure Max(Var X,Y,M:Integer); Begin If X>Y Then M:=X Else M:=Y; End; Begin Readln(A,B,C,D); Max(A,B,M1); Max(C,D,M2); Max(M1,M2,M3); Writeln(’Max=’,M3); End. * задачи

№ слайда 78 * Задачи: Правильно ли описана процедура и обращение к ней (если есть ошибки,
Описание слайда:

* Задачи: Правильно ли описана процедура и обращение к ней (если есть ошибки, то исправить): Procedure Str(Var (A,B,C): Real;) C:=A+B+C; : Str(X,Y,Z,S); : В чем отличие процедур: а)Procedure Str1; Begin P:=(A+B+C)/2; S:=sqrt(P*(P-A)*(P-B)*(P-C)); End; в)Procedure Str1(Var A,B,C,S:Real); Begin P:=(A+B+C)/2; S:=sqrt(P*(P-A)*(P-B)*(P-C)); End; Используя эти процедуры вычислить площадь выпуклого четырехугольника, заданного длинами четырех сторон и диагональю. * далее

№ слайда 79 * Для каждого из приведенных ниже описаний процедур сформулировать назначение
Описание слайда:

* Для каждого из приведенных ниже описаний процедур сформулировать назначение соответствующей процедуры: а)Procedure M(Var X,Y,M:Real); Begin M:=X+Y; End; б)Procedure M1(Var X,Y,Z,T:Real); Begin Z:=X+Y; T:=X*Y; End; в)Procedure M2(Var X,Y,R:Real; Var P:Integer); Begin If sqr(X)+sqr(Y)<=sqr(R) Then P:=1 Else P:=0; End; Процедура описана следующим образом: Procedure M2(Var X,Y:Integer); Допустимо ли обращение к процедуре, имеющее вид М2(A,B-1); Даны числа X,Y,Z. Используя процедуру нахождения максимального из двух чисел, вычислить U=(Max(X,Y)+Max(X,Z))/(Max(Y,Z)); Одинаковы ли последствия обращения к процедурам: а) Procedure P; Begin X:=X+Y; Y:=X-Y; End; б) Procedure P; Begin Y:=X-Y; X:=X+Y; End; * назад

№ слайда 80 * Слово Var не ставится. Используются только для передачи исходных данных в п
Описание слайда:

* Слово Var не ставится. Используются только для передачи исходных данных в процедуру. В ходе выполнения процедуры эти значения изменяться не могут и, следовательно, параметры – значения не могут выполнять роль результата работы. Все формальные параметры, кроме тех, которые присваивают результаты работы, рекомендуется объявлять параметрами – значениями. В фактических параметрах – значениях допускается ставить выражения. Пример: : Procedure Xxx(A,B,C:Integer; Var D:Real);{A,B,C – формальные параметры – значения; D – формальный параметр – переменная; } : Xxx(M,N,X,Y);{M,N,X – могут быть выражениями; Y – только переменная} * примеры назад

№ слайда 81 * Пример1. Program A1; Var X:Integer; Procedure Zamena(Y:Integer); Begin Y:=1
Описание слайда:

* Пример1. Program A1; Var X:Integer; Procedure Zamena(Y:Integer); Begin Y:=1; End; Begin X:=0; Zamena(X); Writeln(’X=’,X); End. Результат: X=0 Пример2. Program Pr2; Var X:Integer; Procedure Zamena(Var Y:Integer); Begin Y:=1; End; Begin X:=0; Zamena(X); Writeln(’X=’,X); End. Результат: X=1 * задача

№ слайда 82 * Задача: Составить программу обращения к процедуре вычисления натуральной ст
Описание слайда:

* Задача: Составить программу обращения к процедуре вычисления натуральной степени числа A (Z=Ak) Program Proc2; Var A,K,Z:Integer; Procedure Nstep(X:Real;N:Integer;Var Y:Real);{Y=Xn} Var I:Integer; Begin Y:=1; For I:=1 to N do Y:=Y*X; End; Begin Readln(A,K); Nstep(A,K,Z); riteln(’Z=’,Z); End. Переменная I, описанная в процедуре, называется локальной по отношению к процедуре. Локальная – местная, имеющая местное значение. Как только процедура выполнится, значение локальной переменной I забудется. * Для самостоятельной работы

№ слайда 83 * Задачи В программе описана процедура Р с формальными параметрами X,Y и проц
Описание слайда:

* Задачи В программе описана процедура Р с формальными параметрами X,Y и процедура Q с формальными параметрами S,T. Среди операторов программы встречаются операторы процедуры P(1,A) и Q(B,D+F). Какие из формальных параметров процедур P и Q заведомо являются параметрами-значениями? Даны числа A, B, C, D. Найти значение выражения K=M*N+K, где M=Max(A,B); N=Max(B,C,D); K=Max(A,B,C,D);. Использовать процедуру нахождения максимального из 2-х чисел. Даны натуральные числа A, B, C, D, X. Найти значение выражения M=(X*A)A+BC*(D*X)C. Использовать процедуру вычисления натуральной степени числа. Составить программу обращения к процедуре вычисления целой степени числа А (Z=Ak) (К-целое число) Даны натуральные числа K, M. Требуется вывести на экран рамку из звездочек высота которой – K строк, ширина – M знаковых позиций. Описать процедуру Zvezda(S,N), обращение к которой дает вывод данной рамки. * назад

№ слайда 84 * Функция – это подпрограмма, результатом выполнения которой является одно ед
Описание слайда:

* Функция – это подпрограмма, результатом выполнения которой является одно единственное значение. Это значение присваивается имени функции. Таким образом, функция не требует введения формальных параметров, играющих роль результата, так как эту роль играет имя самой функции. Функция состоит из заголовка и блока: Заголовок функции: Function Xxx(P1:T1;P2:T2;…Pn:Tm):Q; Xxx - имя функции (любой идентификатор); P1,P2,…,Pn - формальные параметры; T1,T2,…,Tm – типы формальных параметров; Q – тип значений, которые способна принимать функция в результате ее выполнения; Особенности раздела операторов функции: Раздел операторов функции должен содержать оператор присваивания, в котором слева помещено имя функции. Обращение к функции *

№ слайда 85 * * Обращение к функции: Обращение к функци не является оператором, оно входи
Описание слайда:

* * Обращение к функции: Обращение к функци не является оператором, оно входит в состав выражения (например, в правой части оператора присваивания). Z:=Xxx[(B1,B2,…,Bn)]; Задача. Составить программу вычисления максимального из 4-х чисел, используя функцию вычисления максимального из 2-х чисел. Program func1; Var A,B,C,D,M1,M2,M3:Integer; Function Max(X,Y:Integer):Integer; Begin If X>Y Then Max:=X Else Max:=Y; End; Begin Readln(A,B,C,B); m1:=Max(A,B); m2:=Max(C,D); m3:=Max(M1,M2); Writeln(’Max=’,M3); End. назад

№ слайда 86 * * Модули можно использовать для создания библиотек стандартных подпрограмм
Описание слайда:

* * Модули можно использовать для создания библиотек стандартных подпрограмм и данных. В Турбо Паскале в настоящее время имеется большое количество стандартных подпрограмм и данных, объединенных в несколько стандартных модулей: Модуль System Модуль автоматически подключается к любой программе В модуль System входят следующие подпрограммы: арифметические функции; функции для величин порядкового типа; функции преобразования типов; процедуры и функции работы со строками; процедуры и функции работы с файлами;

№ слайда 87 * * Функции работы со строками Function Сoncat(S1[S2,...,Sn]:String):String;
Описание слайда:

* * Функции работы со строками Function Сoncat(S1[S2,...,Sn]:String):String; Объединяет несколько строк в одну. S1,S2,...,Sn - объединяемые строки; Пример1. Program Ct1; Var S,S1,S2:String; Begin Writeln(’Введите 1 строку’); Readln(S1); Writeln(’Введите 2 строку’); Readln(S2); S:=Сoncat(S1,S2); Writeln(’S= ’,S); End. *

№ слайда 88 * Function Сopy(S:String;I,C:Integer):String; Создает подстроку строки S S -
Описание слайда:

* Function Сopy(S:String;I,C:Integer):String; Создает подстроку строки S S - исходная строка I - номер первого выделяемого символа строки С - число выделяемых символов Пример2. Program Ct2; Var S,S1:String; Begin Writeln(’Введите строку’); Readln(S1); S:=Сopy(S1,3,4);{копирует 4 символа, начиная с 3-го} Writeln(’S= ’,S); End. *

№ слайда 89 * Function Length(S:String):Integer; Возвращает текущий размер строки S - стр
Описание слайда:

* Function Length(S:String):Integer; Возвращает текущий размер строки S - строка, у которой определяют размер Пример3. Program Ct3; Var S:String; Y:Integer; Begin Writeln(’Введите строку’); Readln(S); Y:= Length(S); Writeln(’Количество символов в строке = ’,Y); End. *

№ слайда 90 * * Function Pos (S1,S2:String):Byte; Поиск последовательности S1 в строке S2
Описание слайда:

* * Function Pos (S1,S2:String):Byte; Поиск последовательности S1 в строке S2 (результат равен номеру первого символа строки S2, с которого начинается искомая последовательность, или 0, если такой последовательности в строке нет) S1 – искомая последовательность; S2– строка, в которой ищется последовательность; Пример4. Program Ct4; Var S2,S1:String; Y:Integer; Begin Writeln(’Введите строку’); Readln(S2); Writeln(’Введите искомые символы’); Readln(s1); y:= Pos(S1,S2); Writeln(’Искомая последовательность начинается с символа ’,Y); End.

№ слайда 91 * * Процедуры работы со строками Procedure Delete(Var S:String;I,C:Integer);
Описание слайда:

* * Процедуры работы со строками Procedure Delete(Var S:String;I,C:Integer); Удаляет подстроку из строки S S - исходная строка I - номер первого удаляемого символа С - число удаляемых символов Пример5. Program Ct5; Var S:String; Begin Writeln(’Введите строку’); Readln(S); Delete(S,5,3);{удаляет из строки 3 символа, начиная с 5-го} Writeln(S= ’,S); End.

№ слайда 92 * * Procedure Insert(C:String;Var S:String;I:Integer); Помещает подстроку C в
Описание слайда:

* * Procedure Insert(C:String;Var S:String;I:Integer); Помещает подстроку C в строку S S - исходная строка C - подстрока, помещаемая в строку I - номер позиции исхoдной строки, начиная с которой, помещается подстрока Пример6. Program Ct6; Var C,S:String; Begin Writeln(’Введите исходную строку’); Readln(S); Writeln(’Введите подстроку’); Readln(C); Insert(C,S,5);{в строку S помещается подстрока С, раздвигая ее, с 5 позиции} Writeln(’S= ’,S); End.

№ слайда 93 * * Procedure Str(X[:M[:N]];Var S:String); Преобразует число в последовательн
Описание слайда:

* * Procedure Str(X[:M[:N]];Var S:String); Преобразует число в последовательность символов. X - выражение вещественного или целого типа S - строка, в которую записывается символьное представление числа M,N - формат вывода Пример7. Program Ct7; Var S:String; Y:Integer; Begin Writeln(’Введите число’); Readln(Y); Str(Y,S); Writeln(строка, имеющая вид числа = ’,S); End.

№ слайда 94 * * Procedure Val (S:String;Var X; Var C:Integer); Преобразует символьное пре
Описание слайда:

* * Procedure Val (S:String;Var X; Var C:Integer); Преобразует символьное представление числа в число. S – строка c символьным представление числа; X -переменная вещественного или целого типа для записи числа; С – номер неправильного символа (0 – если изображение числа правильное) Пример8. Program Ct8; Var S:String; Y:Integer; Begin Writeln(’Введите строку из цифр’); Readln(S); Val(S,Y,C); Writeln(’число = ’,Y*10);{можно производить арифметические действия} End.

№ слайда 95 * * Задача: Составить программу, которая подсчитывает количество слов в предл
Описание слайда:

* * Задача: Составить программу, которая подсчитывает количество слов в предложении. Пример8. Program Ct8; Var S:String; K,Y:Integer; Begin Writeln(’Введите строку’); Readln(S);K:=1; For Y:=1 to Length(S) do If Copy(S,Y,1)=’ ’ Then K:=K+1; Writeln(’В предложении ’,K,’ слов); End.

№ слайда 96 * * Задачи для самостоятельного решения Дана строка, имеющая вид предложения.
Описание слайда:

* * Задачи для самостоятельного решения Дана строка, имеющая вид предложения. Задача1_1. Вставит в предложение с 3-го символа слово «кит». Задача2_1. Удалить из предложения 3 символа, начиная с 6-го. Задача3_1. Скопировать из предложения 3 символа, начиная со 2-го. Задача1_2. Подсчитать сколько раз встречается буква «м», предлог «не» в предложении. Задача2_2. Выяснить, есть ли в предложении хотя бы одна пара одинаковых символов. Задача3_2. Удалить из предложения все пробелы. Задача1_3. Вставить в предложение пробелы после каждой буквы «а» Задача2_3. Проверить, есть ли в предложении запятые дополнительно

№ слайда 97 * * Модули можно использовать для создания библиотек стандартных подпрограмм
Описание слайда:

* * Модули можно использовать для создания библиотек стандартных подпрограмм и данных. В Турбо Паскале в настоящее время имеется большое количество стандартных подпрограмм и данных, объединенных в несколько стандартных модулей. Мы рассмотрим следующие модули: 1. Модуль System В модуль System входят следующие подпрограммы: арифметические функции; функции для величин порядкового типа; функции преобразования типов; {все вышеперечисленные функции рассмотрены в параграфе 3.3, первой части} процедуры и функции работы со строками; процедуры и функции работы с файлами; 2. Модуль Dos Использование возможностей операционной системы; 3. Модуль Crt Содержит подпрограммы управления текстовым выводом на экран монитора, звуковым генератором и чтения клавиатуры; 4. Модуль Printer Подпрограммы работы с принтером; 5.Модуль Graph Содержит графические подпрограммы; Лишь один модуль System подключается к любой программе автоматически, все остальные становятся доступными только после указания их имен в списке, следующем за словом Uses Далее в скобках будет отмечаться к каким модулям принадлежат описываемые процедуры и функции


Подайте заявку сейчас на любой интересующий Вас курс переподготовки, чтобы получить диплом со скидкой 50% уже осенью 2017 года.


Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Автор
Дата добавления 21.09.2016
Раздел Информатика
Подраздел Презентации
Просмотров135
Номер материала ДБ-206211
Получить свидетельство о публикации
Похожие материалы

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Специальное предложение
Вверх