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

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

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

Получите профессию

Фитнес-тренер

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Методические разработки к Вашему уроку:

Получите новую специальность за 3 месяца

Психолог в социальной сфере

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

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

    1 слайд

    Язык программирования 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 слайд

    Схема программы
    Предлагается
    Разделить алгоритм на процедуры:
    Ввод координат вершин треугольника
    Определение длины сторон
    Определение площади треугольника.
    начало
    Ввод вершин
    треугольника
    Длина стороны
    треугольника
    Площадь треугольника
    по формуле Герона
    Sabc<Sdef
    Smax=Sdef
    Smax=Sabc
    Вывод Smax
    конец

  • program input;
var x1,y1,x2,y2,x3,y3:real;
 begin
 writeln (&#039;---------------...

    11 слайд

    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;

  • Функция расчета длины отрезкаfunction dline (var x1,y1,x2,y2:real):real;
begi...

    12 слайд

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

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

    13 слайд

    Функция расчета площади треугольника по формуле Герона
    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);    {вызов процедуры}
 in...

    14 слайд

    Основная программа
    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.

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

    15 слайд

    Окончательный текст программы
    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.

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

ΔDEF
D(...

    16 слайд

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

    ΔDEF
    D(-1,1)
    E(1,1)
    F(1,-1)
    Sdef=2
    х
    у
    A
    B
    C
    D
    E
    F

  • Задание на самоподготовку1. Составить программу для вычисления высот треуголь...

    17 слайд

    Задание на самоподготовку
    1. Составить программу для вычисления высот треугольника со сторонами а, b, c по формулам:
    2. Составить подпрограмму вычисления площади трапеции по
    основаниям и высоте. Используя эту подпрограмму, найти площади заданных трапеций:
    a=6,5 b=3,4 h=2,5
    a=13,4 b=8,3 h=5,7
    a=15,5 b=8,4 h=6,5

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

    18 слайд

    Решение задачи на самоподготовку
    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.

Получите профессию

Копирайтер

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Скачать материал

Найдите материал к любому уроку, указав свой предмет (категорию), класс, учебник и тему:

6 625 539 материалов в базе

Скачать материал

Другие материалы

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

Оставьте свой комментарий

Авторизуйтесь, чтобы задавать вопросы.

  • Скачать материал
    • 04.07.2020 163
    • PPTX 143.5 кбайт
    • Оцените материал:
  • Настоящий материал опубликован пользователем Федорова Елена Владимировна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт

    Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.

    Удалить материал
  • Автор материала

    Федорова Елена Владимировна
    Федорова Елена Владимировна
    • На сайте: 3 года и 3 месяца
    • Подписчики: 0
    • Всего просмотров: 96159
    • Всего материалов: 228

Ваша скидка на курсы

40%
Скидка для нового слушателя. Войдите на сайт, чтобы применить скидку к любому курсу
Курсы со скидкой

Курс профессиональной переподготовки

Няня

Няня

500/1000 ч.

Подать заявку О курсе

Курс профессиональной переподготовки

Библиотечно-библиографические и информационные знания в педагогическом процессе

Педагог-библиотекарь

300/600 ч.

от 7900 руб. от 3950 руб.
Подать заявку О курсе
  • Сейчас обучается 458 человек из 66 регионов

Курс профессиональной переподготовки

Организация деятельности библиотекаря в профессиональном образовании

Библиотекарь

300/600 ч.

от 7900 руб. от 3950 руб.
Подать заявку О курсе
  • Сейчас обучается 282 человека из 66 регионов

Курс профессиональной переподготовки

Руководство электронной службой архивов, библиотек и информационно-библиотечных центров

Начальник отдела (заведующий отделом) архива

600 ч.

9840 руб. 5900 руб.
Подать заявку О курсе

Мини-курс

Стратегии B2B маркетинга: от анализа до продаж

6 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

Эффективное управление электронным архивом

6 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

Современные методики базальной стимуляции и развивающего ухода для детей с тяжелыми множественными нарушениями развития

6 ч.

780 руб. 390 руб.
Подать заявку О курсе
Сейчас в эфире

Восстановительные и медиативные практики в профилактике кибербуллинга

Перейти к трансляции