🗊Подпрограммы Процедуры Функции

Категория: Информатика
Нажмите для полного просмотра!
Подпрограммы Процедуры Функции, слайд №1Подпрограммы Процедуры Функции, слайд №2Подпрограммы Процедуры Функции, слайд №3Подпрограммы Процедуры Функции, слайд №4Подпрограммы Процедуры Функции, слайд №5Подпрограммы Процедуры Функции, слайд №6Подпрограммы Процедуры Функции, слайд №7Подпрограммы Процедуры Функции, слайд №8Подпрограммы Процедуры Функции, слайд №9Подпрограммы Процедуры Функции, слайд №10Подпрограммы Процедуры Функции, слайд №11Подпрограммы Процедуры Функции, слайд №12Подпрограммы Процедуры Функции, слайд №13Подпрограммы Процедуры Функции, слайд №14Подпрограммы Процедуры Функции, слайд №15Подпрограммы Процедуры Функции, слайд №16Подпрограммы Процедуры Функции, слайд №17
Скачать
Вы можете ознакомиться и скачать Подпрограммы Процедуры Функции. Презентация содержит 17 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации

Слайд 1


Подпрограммы Процедуры Функции
Описание слайда:
Подпрограммы Процедуры Функции

Слайд 2


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

Слайд 3


Подпрограмма-функция Структура подпрограммы: Function <имя> [ (список) ] : <тип>; { Раздел описания } Begin … End; (список) – список формальных параметров.
Описание слайда:
Подпрограмма-функция Структура подпрограммы: Function <имя> [ (список) ] : <тип>; { Раздел описания } Begin … End; (список) – список формальных параметров.

Слайд 4


Переменные… Результат работы функции возвращается через имя функции. Вызов функции может осуществляться только как часть выражения, в котором функция выступает в роли параметра.
Описание слайда:
Переменные… Результат работы функции возвращается через имя функции. Вызов функции может осуществляться только как часть выражения, в котором функция выступает в роли параметра.

Слайд 5


Пример: Program Summa; Uses CRT; Function Summ(a, b:real):real; var c:real; begin c:=a+b; summ:=c end; Var x, y: real; Begin clrscr; write (’x, y : ’); read (x, y); write (’сумма = ’, summ (x, y):6:2); readkey End.
Описание слайда:
Пример: Program Summa; Uses CRT; Function Summ(a, b:real):real; var c:real; begin c:=a+b; summ:=c end; Var x, y: real; Begin clrscr; write (’x, y : ’); read (x, y); write (’сумма = ’, summ (x, y):6:2); readkey End.

Слайд 6


Пример: Program treugolnik; Uses CRT; Function St ( a, b : real ):real; var s:real; begin s:= a * b; st := s/2 end; Var x, y: real; Begin clrscr; write (’x, y : ’); read (x, y); write (’Площадь = ’, st (x, y):6:2); readkey End.
Описание слайда:
Пример: Program treugolnik; Uses CRT; Function St ( a, b : real ):real; var s:real; begin s:= a * b; st := s/2 end; Var x, y: real; Begin clrscr; write (’x, y : ’); read (x, y); write (’Площадь = ’, st (x, y):6:2); readkey End.

Слайд 7


Задание: Составить программу для вычисления значения выражения F. Поиск значения оформить в виде функции.
Описание слайда:
Задание: Составить программу для вычисления значения выражения F. Поиск значения оформить в виде функции.

Слайд 8


Пример: Program Funct1; Uses CRT; Function F1(a, b : real):real; var f:real; begin f:=(a*a*a+2*a*a)/(sqr(a+b)+1); f1:=f end; Var x, y : real; Begin clrscr; write (’x, y : ’); read (x, y); write (’f = ’, f1(x,y):6:2); readkey End.
Описание слайда:
Пример: Program Funct1; Uses CRT; Function F1(a, b : real):real; var f:real; begin f:=(a*a*a+2*a*a)/(sqr(a+b)+1); f1:=f end; Var x, y : real; Begin clrscr; write (’x, y : ’); read (x, y); write (’f = ’, f1(x,y):6:2); readkey End.

Слайд 9


Пример: Program Funct2; Uses CRT; Function F2(a, b:real):real; var f:real; begin f:=1/(a+b); f2:=f end; Var x, y : real; Begin clrscr; write (’x, y : ’); read (x, y); write(’ F = ’, F2(f2(x,y*y), f2(x*x,y)):7:2); readkey End.
Описание слайда:
Пример: Program Funct2; Uses CRT; Function F2(a, b:real):real; var f:real; begin f:=1/(a+b); f2:=f end; Var x, y : real; Begin clrscr; write (’x, y : ’); read (x, y); write(’ F = ’, F2(f2(x,y*y), f2(x*x,y)):7:2); readkey End.

Слайд 10


Площадь треугольника: формула Герона
Описание слайда:
Площадь треугольника: формула Герона

Слайд 11


Решение задачи по формуле Герона
Описание слайда:
Решение задачи по формуле Герона

Слайд 12


Задание: Составить программу поиска средней скорости автомобиля на пути от А до В, зная скорости на участках АB, BC, CD. Поиск скорости на указанных участках оформить в виде подпрограммы.
Описание слайда:
Задание: Составить программу поиска средней скорости автомобиля на пути от А до В, зная скорости на участках АB, BC, CD. Поиск скорости на указанных участках оформить в виде подпрограммы.

Слайд 13


Задание: Скалярным произведением двух векторов называют величину, равную произведению модулей этих векторов на косинус угла между ними. Есть и другое определение: это величина, равная сумме произведений соответствующих координат. Составить программу и описать подпрограмму нахождения скалярного произведения 2-х векторов по второму определению.
Описание слайда:
Задание: Скалярным произведением двух векторов называют величину, равную произведению модулей этих векторов на косинус угла между ними. Есть и другое определение: это величина, равная сумме произведений соответствующих координат. Составить программу и описать подпрограмму нахождения скалярного произведения 2-х векторов по второму определению.

Слайд 14


Program Skalyar; Program Skalyar; Uses CRT; Function Sk(x1, y1, x2, y2: real): real; Var s:real; Begin s:=x1*x2+y1*y2; sk:=s end; Var x1, y1, x2, y2 : real; Begin clrscr; write(’ Введите координаты вектора AB: ’); read(x1, y1); write(’ Введите координаты вектора AC: ’); read(x2, y2); write(’ (AB, AC) = ’, sk(x1, y1, x2, y2):6:2); readkey End.
Описание слайда:
Program Skalyar; Program Skalyar; Uses CRT; Function Sk(x1, y1, x2, y2: real): real; Var s:real; Begin s:=x1*x2+y1*y2; sk:=s end; Var x1, y1, x2, y2 : real; Begin clrscr; write(’ Введите координаты вектора AB: ’); read(x1, y1); write(’ Введите координаты вектора AC: ’); read(x2, y2); write(’ (AB, AC) = ’, sk(x1, y1, x2, y2):6:2); readkey End.

Слайд 15


Program Skalyar; Program Skalyar; Uses CRT; Type vector = array [1..2] of real; Function Sk(a, b: vector): real; Var s:real; Begin s:=a[1]*b[1]+a[2]*b[2]; sk:=s end; Var AB, AC : vector; Begin clrscr; write(’ Введите координаты вектора AB: ’); read(AB[1], AB[2]); write(’ Введите координаты вектора AC: ’); read(AC[1], AC[2]); write(’ (AB, AC) = ’, sk(AB, AC):6:2); readkey End.
Описание слайда:
Program Skalyar; Program Skalyar; Uses CRT; Type vector = array [1..2] of real; Function Sk(a, b: vector): real; Var s:real; Begin s:=a[1]*b[1]+a[2]*b[2]; sk:=s end; Var AB, AC : vector; Begin clrscr; write(’ Введите координаты вектора AB: ’); read(AB[1], AB[2]); write(’ Введите координаты вектора AC: ’); read(AC[1], AC[2]); write(’ (AB, AC) = ’, sk(AB, AC):6:2); readkey End.

Слайд 16


Задание: Векторным произведением двух векторов a и b называют такой вектор с, координаты которого определяют по следующим правилам: Составить программу и описать подпрограмму нахождения координат векторного произведения 2-х векторов.
Описание слайда:
Задание: Векторным произведением двух векторов a и b называют такой вектор с, координаты которого определяют по следующим правилам: Составить программу и описать подпрограмму нахождения координат векторного произведения 2-х векторов.

Слайд 17


Program Vectornoe; Uses CRT; Program Vectornoe; Uses CRT; Function St (a1, a2, b1, b2 : real ):real; Var s :real; Begin s:=a1*b2-b1*a2; st:=s end; Var x1, y1, z1, x2, y2, z2 : real; Begin clrscr; write (’Введите координаты первого вектора: ’); read (x1, y1, z1); write (’Введите координаты второго вектора: ’); read (x2, y2, z2); write (’Вектор [a, b] = ( ’, st(y1, y2, z1, z2):6:2, ’ , ’, st(z1, z2, x1, x2):6:2, ’ , ’, st(x1, x2, y1, y2):6:2, ’ ) ’); readkey End.
Описание слайда:
Program Vectornoe; Uses CRT; Program Vectornoe; Uses CRT; Function St (a1, a2, b1, b2 : real ):real; Var s :real; Begin s:=a1*b2-b1*a2; st:=s end; Var x1, y1, z1, x2, y2, z2 : real; Begin clrscr; write (’Введите координаты первого вектора: ’); read (x1, y1, z1); write (’Введите координаты второго вектора: ’); read (x2, y2, z2); write (’Вектор [a, b] = ( ’, st(y1, y2, z1, z2):6:2, ’ , ’, st(z1, z2, x1, x2):6:2, ’ , ’, st(x1, x2, y1, y2):6:2, ’ ) ’); readkey End.

Скачать

Похожие презентации
Mypresentation.ru
Загрузить презентацию