Функции в языке Паскаль

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

Цели урока:

1.       образовательные: а) познакомить с понятием функция, тип, глобальные и локальные переменные;

б) научить описанию и вызову функцию;

2.       развивающие: а) формирование навыки работы с функциями;

б) развитие логического мышления;

3.       воспитательные: воспитание ИК.

Тип урока: Комбинированный.

Оборудование: Учебник Турбо Паскаль 7.0

Ход урока:

I. Орг.момент.   

II. Актуализация. На прошлом уроке вы начали изучать подпрограммы в языке Паскаль. Давайте сейчас повторим:

- Что такое подпрограмма?» (Подпрограмма – это  именуемая, логически законченная группа операторов языка, которую можно вызвать для выполнения любое количество раз из различных мест программы.)

- Какие подпрограммы вы знаете? (Процедуры и функции.)

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

III. Изложение нового материала. Описание функции состоит из заголовка и тела. Заголовок содержит служебное слово function, имя функции, список формальных параметров с указанием их типа и типа возвращаемого результата:

Function <имя функции> (<список формальных параметров>): <тип>.

Тип- это возвращаемая функция значения.

Функции могут возвращать значение целого, вещественного, логического и символьного типа. Например:

function tan (x: real):real ;   function max (x, y: integer): integer;

Отличие функции от процедуры заключается в том, что результатом функции является одно единственное значение.

Обращение функциям осуществляется по имени с указанием списка фактических параметров. Количество, типы и порядок следования формальных и фактических параметров должны совпадать.

<имя функции> ( <список фактических параметров>);

В теле функции всегда должен быть один оператор, присваивающий значение имени функции. Например:  y:= tan (x);    t:= max (a, b).

А сейчас рассмотрим пример использования функции.

Вычисление тангенса двух углов.

Program primer;

 Function tan (x: real): real;          {описание функции}

  Var y: real;

    Begin

     y:=sin(x)/ cos(x);                      {тело функции}

      tan:= y;

       end;  

            Var a, b, c, d:real;

         Begin

          Writeln (‘введите 2 числа’);

           Readln (a, b);

            c:= tan (a);                         {обращение к функции}

             d:= tan (b);

              Writeln (‘тангенс углов’ , a, b, ‘=’ , c, d);

               End.

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

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

Для правильного определения области действия переменных необходимо придерживаться следующих правил:

- каждая переменная должна быть описана перед тем, как она будет использована;

- областью действия переменной является та подпрограмма, в которой она описана;

- все переменные в подпрограммах должны быть уникальными;

- одна и та же переменная может быть по-разному определена в каждой из подпрограмм;

- если имя подпрограммы совпадает с названием стандартной подпрограммы, то последняя игнорируется, а выполняется подпрограмма пользователя;

- если внутри какой-либо процедуры встречается переменная с таким же именам, что и глобальная переменная, то внутри процедуры будет действовать локальное описание;

- каждая подпрограмма может изменить значение глобальной переменной.

IV. Закрепление.  А сейчас давайте решим задачу.

Задание 1. Дана строка символов. Подсчитать количество букв «а» и букв «с»  в этой строке.

Program zad1;

 Uses wincrt;

  Function poisk (x: char; s: string): integer;

   Var i, k: integer;

           Begin

      k:=0;

        for i:=1 to length(s) do

         if s[i]=x

          then

           k:=k+1;

            poisk:=k;

             end;

var i,n: integer;    s: string;

 begin

  writeln(‘s’);

    readln(s);

     n:=poisk (‘a’, s);

       writeln ('в строке букв а=',n);

        n:=poisk('с',s);

         writeln ('в строке букв с=',n);

           end.

Задание 2. Дана строка символов. Удалить из нее все буквы «в» и «,».

program z1;

 uses wincrt;

  function udal(a:char; s:string):integer;

   var i, c: integer;

begin

 i:=1;

  while i<=length(s) do

    begin

     if s[i]=a

      then

       delete (s,i,1)

        else

         i:=i+1; end;

          udal:=c;

           writeln (s);

            end;

             var s:string; i,f,k:integer;

              begin

               writeln ('s');

                readln (s);

                 f:=udal ('в',s);

                  k:=udal (',',s);

                           end.

V. Подведение итогов.

VI. Домашнее задание.

Знать материал урока.

Решить задачу:

Дана строка символов. После символа «о» вставить «!».

Конспект урока по теме: Функции в языке Паскаль.

Цели урока:

1. образовательные: а) познакомить с понятием функция, тип, глобальные и локальные переменные;

б) научить описанию и вызову функцию;

1. развивающие: а) формирование навыки работы с функциями;

б) развитие логического мышления;

1. воспитательные: воспитание ИК.

Тип урока: Комбинированный.

Оборудование: Учебник Турбо Паскаль 7.0

Ход урока:

I. Орг.момент.

II. Актуализация. На прошлом уроке вы начали изучать подпрограммы в языке Паскаль. Давайте сейчас повторим:

- Что такое подпрограмма?» (Подпрограмма – это именуемая, логически законченная группа операторов языка, которую можно вызвать для выполнения любое количество раз из различных мест программы.)

- Какие подпрограммы вы знаете? (Процедуры и функции.)

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

III. Изложение нового материала. Описание функции состоит из заголовка и тела. Заголовок содержит служебное слово function, имя функции, список формальных параметров с указанием их типа и типа возвращаемого результата:

Function (): .

Тип- это возвращаемая функция значения.

Функции могут возвращать значение целого, вещественного, логического и символьного типа. Например:

function tan (x: real):real ; function max (x, y: integer): integer;

Отличие функции от процедуры заключается в том, что результатом функции является одно единственное значение.

Обращение функциям осуществляется по имени с указанием списка фактических параметров. Количество, типы и порядок следования формальных и фактических параметров должны совпадать.

( );

В теле функции всегда должен быть один оператор, присваивающий значение имени функции. Например: y:= tan (x); t:= max (a, b).

А сейчас рассмотрим пример использования функции.

Вычисление тангенса двух углов.

Program primer;

Function tan (x: real): real; {описание функции}

Var y: real;

Begin

y:=sin(x)/ cos(x); {тело функции}

tan:= y;

end;

Var a, b, c, d:real;

Begin

Writeln (‘введите 2 числа’);

Readln (a, b);

c:= tan (a); {обращение к функции}

d:= tan (b);

Writeln (‘тангенс углов’ , a, b, ‘=’ , c, d);

End.

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

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

Для правильного определения области действия переменных необходимо придерживаться следующих правил:

- каждая переменная должна быть описана перед тем, как она будет использована;

- областью действия переменной является та подпрограмма, в которой она описана;

- все переменные в подпрограммах должны быть уникальными;

- одна и та же переменная может быть по-разному определена в каждой из подпрограмм;

- если имя подпрограммы совпадает с названием стандартной подпрограммы, то последняя игнорируется, а выполняется подпрограмма пользователя;

- если внутри какой-либо процедуры встречается переменная с таким же именам, что и глобальная переменная, то внутри процедуры будет действовать локальное описание;

- каждая подпрограмма может изменить значение глобальной переменной.

IV. Закрепление. А сейчас давайте решим задачу.

Задание 1. Дана строка символов. Подсчитать количество букв «а» и букв «с» в этой строке.

Program zad1;

Uses wincrt;

Function poisk (x: char; s: string): integer;

Var i, k: integer;

Begin

k:=0;

for i:=1 to length(s) do

if s[i]=x

then

k:=k+1;

poisk:=k;

end;

var i,n: integer; s: string;

begin

writeln(‘s’);

readln(s);

n:=poisk (‘a’, s);

writeln ('в строке букв а=',n);

n:=poisk('с',s);

writeln ('в строке букв с=',n);

end.

Задание 2. Дана строка символов. Удалить из нее все буквы «в» и «,».

program z1;

uses wincrt;

function udal(a:char; s:string):integer;

var i, c: integer;

begin

i:=1;

while i

begin

if s[i]=a

then

delete (s,i,1)

else

i:=i+1; end;

udal:=c;

writeln (s);

end;

var s:string; i,f,k:integer;

begin

writeln ('s');

readln (s);

f:=udal ('в',s);

k:=udal (',',s);

end.

V. Подведение итогов.

VI. Домашнее задание.

Знать материал урока.

Решить задачу:

Дана строка символов. После символа «о» вставить «!».