587413
столько раз учителя, ученики и родители
посетили сайт «Инфоурок»
за прошедшие 24 часа
+Добавить материал
и получить бесплатное
свидетельство о публикации
в СМИ №ФС77-60625 от 20.01.2015
Дистанционные курсы профессиональной переподготовки и повышения квалификации для педагогов

Дистанционные курсы для педагогов - курсы профессиональной переподготовки от 1.410 руб.;
- курсы повышения квалификации от 430 руб.
Московские документы для аттестации

ВЫБРАТЬ КУРС СО СКИДКОЙ ДО 90%

ВНИМАНИЕ: Скидка действует ТОЛЬКО до конца апреля!

(Лицензия на осуществление образовательной деятельности №038767 выдана ООО "Столичный учебный центр", г.Москва)

ИнфоурокИнформатикаПрезентацииПрезентация к уроку "Процедуры и функции на языке программирования Паскаль."

Презентация к уроку "Процедуры и функции на языке программирования Паскаль."

библиотека
материалов
Язык программирования Pascal Процедуры и функции А. Жидков
Вспомогательный алгоритм - подпрограмма Подпрограммы применяются когда: часть...
Процедуры и функции Процедура( функция) представляет собой последовательность...
Описание процедур и функций Все процедуры или функции должны быть описаны в р...
Параметры процедур и функций Список формальных параметров состоит из одной ил...
Раздел описаний локальных параметров Раздел описаний процедуры или функции ус...
Локальные и глобальные параметры Глобальными называются переменные, объявленн...
Решение задач с использованием подпрограмм Заданы координаты вершин двух треу...
Формулы для решения задачи Решение: Формула длинны отрезка по координатам кон...
Схема программы Предлагается Разделить алгоритм на процедуры: Ввод координат...
program input; var x1,y1,x2,y2,x3,y3:real; begin writeln ('-----------------...
Функция расчета длины отрезка function dline (var x1,y1,x2,y2:real):real; beg...
Функция расчета площади треугольника по формуле Герона function geron (var a,...
Основная программа begin input (xa,ya,xb,yb,xc,yc); {вызов процедуры} input (...
Окончательный текст программы program Smaxtr; Var xa,ya,xb,yb,xc,yc,a,b,c,Sab...
Тестовое задание и результаты теста ΔABC A(0,0) B(-1,1) C(1,1) Sabc=1 ΔDEF D(...
Решение задачи на самоподготовку 2. Составить подпрограмму вычисления площади...

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

1 слайд Язык программирования Pascal Процедуры и функции А. Жидков
Описание слайда:

Язык программирования Pascal Процедуры и функции А. Жидков

2 слайд Вспомогательный алгоритм - подпрограмма Подпрограммы применяются когда: часть
Описание слайда:

Вспомогательный алгоритм - подпрограмма Подпрограммы применяются когда: часть алгоритма неоднократно повторяется в программе; можно использовать фрагменты разработанных ранее алгоритмов; для разбиения крупных программ на части в соответствии с модульным принципом программирования. В паскале реализовано два типа подпрограмм процедуры и функции.

3 слайд Процедуры и функции Процедура( функция) представляет собой последовательность
Описание слайда:

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

4 слайд Описание процедур и функций Все процедуры или функции должны быть описаны в р
Описание слайда:

Описание процедур и функций Все процедуры или функции должны быть описаны в разделе описаний основной программы. Описание процедуры имеет вид: procedure имя (список формальных параметров); раздел описаний локальных параметров begin   операторы тела процедуры end; Описание функции имеет вид: function имя (список формальных параметров): тип значения функции; раздел описаний локальных параметров begin   операторы тела функции end;

5 слайд Параметры процедур и функций Список формальных параметров состоит из одной ил
Описание слайда:

Параметры процедур и функций Список формальных параметров состоит из одной или нескольких секций, разделенных символом " ; ". Секция состоит из списка переменных, перечисляемых через запятую, знака “:” и типа. Секция может предваряться служебным словом var - тогда параметры передаются по ссылке, (экономия памяти и времени). Если var отсутствует параметры передаются значениями. Список формальных параметров вместе с окружающими скобками может отсутствовать.

6 слайд Раздел описаний локальных параметров Раздел описаний процедуры или функции ус
Описание слайда:

Раздел описаний локальных параметров Раздел описаний процедуры или функции устроен так же, как и раздел описаний программы. Здесь описываются локальные переменные, константы и вложенные процедуры и функции. Все такие локальные объекты доступны лишь внутри данной подпрограммы и не видны извне.

7 слайд Локальные и глобальные параметры Глобальными называются переменные, объявленн
Описание слайда:

Локальные и глобальные параметры Глобальными называются переменные, объявленные в основной программе и доступные как программе, так и всем ее подпрограммам. Локальными называются переменные, объявленные внутри подпрограммы и доступные только ей самой. Обмен информацией между основной программой и подпрограммой может осуществляться двумя способами: через глобальные переменные с помощью параметров подпрограммы. Подпрограмма может использовать любые глобальные переменные кроме тех, которые имеют те же имена, что и ее локальные переменные. Если в подпрограмме описана локальная переменная, имя которой совпадает с именем некоторой глобальной переменной, то данная глобальная переменная становится недоступной в этой подпрограмме, и при указании идентификатора переменной произойдет обращение к локальной переменой подпрограммы, а не одноименной глобальной переменной. Память для локальных (т.е. описанных в подпрограмме) переменных выделяется на время исполнения данной подпрограммы в специальной области, называемой стеком. При завершении работы подпрограммы память освобождается, поэтому все внутренние результаты работы подпрограммы не сохраняются от одного обращения к другому.

8 слайд Решение задач с использованием подпрограмм Заданы координаты вершин двух треу
Описание слайда:

Решение задач с использованием подпрограмм Заданы координаты вершин двух треугольников на плоскости. Определить какой из треугольников имеет большую площадь. Дано: Координаты ABC (Xa, Ya) (Xb,Yb) (Xc,Yc) Координаты DEF (Xd, Yd) (Xe,Ye) (Xf,Yf) Найти: Smax=max(Sabc,Sdef)

9 слайд Формулы для решения задачи Решение: Формула длинны отрезка по координатам кон
Описание слайда:

Формулы для решения задачи Решение: Формула длинны отрезка по координатам концов Формула площади треугольника по трем сторонам (Формула Герона)

10 слайд Схема программы Предлагается Разделить алгоритм на процедуры: Ввод координат
Описание слайда:

Схема программы Предлагается Разделить алгоритм на процедуры: Ввод координат вершин треугольника Определение длины сторон Определение площади треугольника.

11 слайд program input; var x1,y1,x2,y2,x3,y3:real; begin writeln ('-----------------
Описание слайда:

program input; var x1,y1,x2,y2,x3,y3:real; begin writeln ('--------------------------'); writeln ('ввод координат вершин треугольника'); writeln ('введите координаты 1 вершины'); write ('x1='); read (x1); write ('y1='); read (y1); writeln ('введите координаты 2 вершины'); write ('x2='); read (x2); write ('y2='); read (y2); writeln ('введите координаты 3 вершины'); write ('x3='); read (x3); write ('y3='); read (y3); end; Процедура ввода данных procedure input (var x1,y1,x2,y2,x3,y3:real); begin writeln ('--------------------------'); writeln ('ввод координат вершин треугольника'); writeln ('введите координаты 1 вершины'); write ('x1='); read (x1); write ('y1='); read (y1); writeln ('введите координаты 2 вершины'); write ('x2='); read (x2); write ('y2='); read (y2); writeln ('введите координаты 3 вершины'); write ('x3='); read (x3); write ('y3='); read (y3); end;

12 слайд Функция расчета длины отрезка function dline (var x1,y1,x2,y2:real):real; beg
Описание слайда:

Функция расчета длины отрезка function dline (var x1,y1,x2,y2:real):real; begin dline:=sqrt(sqr(x2-x1)+sqr(y2-y1)); end;

13 слайд Функция расчета площади треугольника по формуле Герона function geron (var a,
Описание слайда:

Функция расчета площади треугольника по формуле Герона function geron (var a,b,c:real):real; var p:real; begin p:=(a+b+c)/2; geron:=sqrt(abs(p*(p-a)*(p-b)*(p-c))); end; Формальные параметры функции и их тип Локальный параметр и его тип Тип функции Имя функции

14 слайд Основная программа begin input (xa,ya,xb,yb,xc,yc); {вызов процедуры} input (
Описание слайда:

Основная программа begin input (xa,ya,xb,yb,xc,yc); {вызов процедуры} input (xd,yd,xe,ye,xf,yf); a:=dline(xb,yb,xc,yc); {вызов функции} b:=dline(xa,ya,xc,yc); c:=dline(xb,yb,xa,ya); d:=dline(xe,ye,xf,yf); e:=dline(xd,yd,xf,yf); f:=dline(xd,yd,xe,ye); Sabc:=geron(a,b,c); {вызов функции} Sdef:=geron(d,e,f); writeln ('Sabc=',Sabc,'Sdef=',Sdef); Smax:=Sabc; if Sdef>Sabc then Smax:=Sdef; writeln ('Smax=',Smax); end.

15 слайд Окончательный текст программы program Smaxtr; Var xa,ya,xb,yb,xc,yc,a,b,c,Sab
Описание слайда:

Окончательный текст программы program Smaxtr; Var xa,ya,xb,yb,xc,yc,a,b,c,Sabc: real; xd,yd,xe,ye,xf,yf,d,e,f,Sdef: real; Smax:real; procedure input (var x1,y1,x2,y2,x3,y3:real); begin writeln ('ввод координат вершин треугольника'); writeln ('введите координаты 1 вершины'); write ('x1='); read (x1); write ('y1='); read (y1); writeln ('введите координаты 2 вершины'); write ('x2='); read (x2); write ('y2='); read (y2); writeln ('введите координаты 3 вершины'); write ('x3='); read (x3); write ('y3='); read (y3); end; function dline (var x1,y1,x2,y2:real):real; begin dline:=sqrt(sqr(x2-x1)+sqr(y2-y1)); end; function geron (var a,b,c:real):real; var p:real; begin p:=(a+b+c)/2; geron:=sqrt(abs(p*(p-a)*(p-b)*(p-c))); end; begin input (xa,ya,xb,yb,xc,yc); input (xd,yd,xe,ye,xf,yf); a:=dline(xb,yb,xc,yc); b:=dline(xa,ya,xc,yc); c:=dline(xb,yb,xa,ya); d:=dline(xe,ye,xf,yf); e:=dline(xd,yd,xf,yf); f:=dline(xd,yd,xe,ye); Sabc:=geron(a,b,c); Sdef:=geron(d,e,f); writeln ('Sabc=',Sabc,'Sdef=',Sdef); Smax:=Sabc; if Sdef>Sabc then Smax:=Sdef; writeln ('Smax=',Smax); end.

16 слайд Тестовое задание и результаты теста ΔABC A(0,0) B(-1,1) C(1,1) Sabc=1 ΔDEF D(
Описание слайда:

Тестовое задание и результаты теста ΔABC A(0,0) B(-1,1) C(1,1) Sabc=1 ΔDEF D(-1,1) E(1,1) F(1,-1) Sdef=2

17 слайд Решение задачи на самоподготовку 2. Составить подпрограмму вычисления площади
Описание слайда:

Решение задачи на самоподготовку 2. Составить подпрограмму вычисления площади трапеции по основаниям и высоте. Используя эту подпрограмму, найти площади заданных трапеций: 1. a=6,5 b=3,4 h=2,5 2. a=13,4 b=8,3 h=5,7 3. a=15,5 b=8,4 h=6,5 PROGRAM Trapec; Const N=3; var i:integer; a,b,h,s: array[1..N] of real; Procedure STR(a, b, h: real ; var s: real); begin s:=(a+b)/2*h; end; BEGIN for i:=1 to N Do begin writeln('a=',' b=',' h='); readln(a[i],b[i],h[i]); end; for i:=1 to N Do begin STR (a[i],b[i],h[i],s[i]); Writeln (' a=', a[i]:6:2,' b=', b[i]:6:2,' h=', h[i]:6:2); Writeln ( ' s=', s [i]:7:3); end; END.

Общая информация

Номер материала: ДВ-200197

Вам будут интересны эти курсы:

Курс повышения квалификации «Информационные технологии в деятельности учителя физики»
Курс повышения квалификации «Методика преподавания информатики в начальных классах»
Курс повышения квалификации «Современные информационные технологии и их использование в работе преподавателей. Системы автоматизированного проектирования одежды и организация технологического процесса»
Курс повышения квалификации «Основы создания интерактивного урока: от презентации до видеоурока»
Курс повышения квалификации «Внедрение системы компьютерной математики в процесс обучения математике в старших классах в рамках реализации ФГОС»
Курс «Фирменный стиль» (Corel Draw, Photoshop)
Курс «3D Studio MAX»
Курс «WEB-ВЕРСТКА (HTML, CSS)»
Курс повышения квалификации «Развитие информационно-коммуникационных компетенций учителя в процессе внедрения ФГОС: работа в Московской электронной школе»
Курс профессиональной переподготовки «Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»
Курс повышения квалификации «Применение MS Word, Excel в финансовых расчетах»
Курс профессиональной переподготовки «Математика и информатика: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Современные языки программирования интегрированной оболочки Microsoft Visual Studio C# NET., C++. NET, VB.NET. с использованием структурного и объектно-ориентированного методов разработки корпоративных систем»
Курс повышение квалификации «Применение интерактивных образовательных платформ на примере платформы Moodle»

Благодарность за вклад в развитие крупнейшей онлайн-библиотеки методических разработок для учителей

Опубликуйте минимум 3 материала, чтобы БЕСПЛАТНО получить и скачать данную благодарность

Сертификат о создании сайта

Добавьте минимум пять материалов, чтобы получить сертификат о создании сайта

Грамота за использование ИКТ в работе педагога

Опубликуйте минимум 10 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Свидетельство о представлении обобщённого педагогического опыта на Всероссийском уровне

Опубликуйте минимум 15 материалов, чтобы БЕСПЛАТНО получить и скачать данное cвидетельство

Грамота за высокий профессионализм, проявленный в процессе создания и развития собственного учительского сайта в рамках проекта "Инфоурок"

Опубликуйте минимум 20 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Грамота за активное участие в работе над повышением качества образования совместно с проектом "Инфоурок"

Опубликуйте минимум 25 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Почётная грамота за научно-просветительскую и образовательную деятельность в рамках проекта "Инфоурок"

Опубликуйте минимум 40 материалов, чтобы БЕСПЛАТНО получить и скачать данную почётную грамоту

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