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

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

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

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

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

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

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

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

Презентации по языку программирования Delphi

Выбранный для просмотра документ Ветвление в Delphi.pptx

библиотека
материалов
Ветвление в алгоритмах и программах
Два вида ветвления в алгоритмах: полное ветвление неполное ветвление
Общий вид команды полного ветвления в Delphi: If  Тhen begin 		< последовател...
Общий вид команды неполного ветвления в Delphi: If  Тhen begin 		 	 end;
Внимание: если после ключевых слов Then и Else следует только по одной команд...
Задача 1. Создайте проект, который вычисляет значение выражения (a-b)/(c-d),...
procedure TForm1.Button1Click(Sender: TObject); Var a,b,c,d,x,y,z:real; begin...
Решение
Отладочные данные
 Внимание! Десятичные числа записываются через запятую. Отладочные данные
Задача 2. Создайте проект, который вычисляет абсолютную величину числа. y = |...
Домашнее задание: п. 2.8 (стр. 73 – 78) Задания № 2, 4
12 1

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


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

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

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

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

№ слайда 1 Ветвление в алгоритмах и программах
Описание слайда:

Ветвление в алгоритмах и программах

№ слайда 2 Два вида ветвления в алгоритмах: полное ветвление неполное ветвление
Описание слайда:

Два вида ветвления в алгоритмах: полное ветвление неполное ветвление

№ слайда 3 Общий вид команды полного ветвления в Delphi: If  Тhen begin 		&lt; последовател
Описание слайда:

Общий вид команды полного ветвления в Delphi: If <логическое выражение> Тhen begin < последовательность команд 1> end Еlse begin < последовательность команд 2> end; (англ. if – если, then – тогда, else – иначе)

№ слайда 4 Общий вид команды неполного ветвления в Delphi: If  Тhen begin 		 	 end;
Описание слайда:

Общий вид команды неполного ветвления в Delphi: If <логическое выражение> Тhen begin <последовательность команд > end;

№ слайда 5 Внимание: если после ключевых слов Then и Else следует только по одной команд
Описание слайда:

Внимание: если после ключевых слов Then и Else следует только по одной команде, то операторные скобки begin и end можно не ставить; перед Else ставить точку с запятой нельзя.

№ слайда 6 Задача 1. Создайте проект, который вычисляет значение выражения (a-b)/(c-d),
Описание слайда:

Задача 1. Создайте проект, который вычисляет значение выражения (a-b)/(c-d), где a, b, с, d – действительные числа.

№ слайда 7 procedure TForm1.Button1Click(Sender: TObject); Var a,b,c,d,x,y,z:real; begin
Описание слайда:

procedure TForm1.Button1Click(Sender: TObject); Var a,b,c,d,x,y,z:real; begin a := StrToFloat(Edit1.Text); b := StrToFloat(Edit2.Text); c := StrToFloat(Edit3.Text); d := StrToFloat(Edit4.Text); x := c-d; If x = 0 Then Label5.Caption := 'Выражение значения не имеет: деление на нуль' Else begin y := a-b; z := y/x; Label5.Caption := FloatToStr(z); end; end; end.

№ слайда 8 Решение
Описание слайда:

Решение

№ слайда 9 Отладочные данные
Описание слайда:

Отладочные данные

№ слайда 10  Внимание! Десятичные числа записываются через запятую. Отладочные данные
Описание слайда:

Внимание! Десятичные числа записываются через запятую. Отладочные данные

№ слайда 11 Задача 2. Создайте проект, который вычисляет абсолютную величину числа. y = |
Описание слайда:

Задача 2. Создайте проект, который вычисляет абсолютную величину числа. y = |x| = x при x ≥ 0 -x при x < 0 Нет Да

№ слайда 12 Домашнее задание: п. 2.8 (стр. 73 – 78) Задания № 2, 4
Описание слайда:

Домашнее задание: п. 2.8 (стр. 73 – 78) Задания № 2, 4

Выбранный для просмотра документ Команда цикла со счетчиком.pptx

библиотека
материалов
Циклы в алгоритмах и программах. Команда цикла со счетчиком
Актуализация опорных знаний Как выглядит и как выполняется команда полного ве...
Фрагмент алгоритма, состоящий из команд, которые могут быть выполнены более о...
Задача	Есть бочка и ведро. Используя ведро, наполнить бочку водой из колодца....
Если бы в условии предыдущей задачи было известно, что бочка пустая, то блок...
Блок схема цикла с предусловием с постусловием
Команда цикла со счетчиком в Delphi Ее целесообразно использовать, когда зара...
Строка for … to … do (англ. for – для, to - до, do – делать, выполнять) назыв...
Обратный цикл со счетчиком for  :=  downto  do begin  end; (англ. down – вниз...
Выполните алгоритм 26
Создайте проект для вычисления суммы первых 10 натуральных чисел (1 + 2 + … +...
var i, s: integer; begin s:=0; for i:= 1 to 10 do s:=s + i; Label1.Caption :=...
Задача 2. Создайте проект для вычисления 10! (1*2*3*…*10). Указание: Заменить...
ДОМАШНЕЕ ЗАДАНИЕ п. 2.9, стр. 84-88, № 3
15 1

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


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

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

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

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

№ слайда 1 Циклы в алгоритмах и программах. Команда цикла со счетчиком
Описание слайда:

Циклы в алгоритмах и программах. Команда цикла со счетчиком

№ слайда 2 Актуализация опорных знаний Как выглядит и как выполняется команда полного ве
Описание слайда:

Актуализация опорных знаний Как выглядит и как выполняется команда полного ветвления в Delphi? Как выглядит и как выполняется команда неполного ветвления в Delphi? Как и для чего используются переключатели и флажки? Какие процессы называются циклическими?

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

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

№ слайда 4 Задача	Есть бочка и ведро. Используя ведро, наполнить бочку водой из колодца.
Описание слайда:

Задача Есть бочка и ведро. Используя ведро, наполнить бочку водой из колодца. Тело цикла Цикл с предусловием

№ слайда 5 Если бы в условии предыдущей задачи было известно, что бочка пустая, то блок
Описание слайда:

Если бы в условии предыдущей задачи было известно, что бочка пустая, то блок схема модифицированной задачи выглядела бы так: Цикл с постусловием

№ слайда 6 Блок схема цикла с предусловием с постусловием
Описание слайда:

Блок схема цикла с предусловием с постусловием

№ слайда 7 Команда цикла со счетчиком в Delphi Ее целесообразно использовать, когда зара
Описание слайда:

Команда цикла со счетчиком в Delphi Ее целесообразно использовать, когда заранее известно количество повторений команд тела цикла. for <имя переменной> := <выражение 1> to <выражение 2> do begin <команды тела цикла> end;

№ слайда 8 Строка for … to … do (англ. for – для, to - до, do – делать, выполнять) назыв
Описание слайда:

Строка for … to … do (англ. for – для, to - до, do – делать, выполнять) называется строкой заголовка команды цикла со счетчиком. Переменная в строке заголовка, стоящая перед знаком присваивания, называется счетчиком цикла. Счетчик цикла, выражение 1 и выражение 2 должны принимать только целые значения. Если тело цикла состоит только из одной команды, операторные скобки begin и end можно не ставить.

№ слайда 9
Описание слайда:

№ слайда 10 Обратный цикл со счетчиком for  :=  downto  do begin  end; (англ. down – вниз
Описание слайда:

Обратный цикл со счетчиком for <имя переменной> := <выражение 1> downto <выражение 2> do begin <команды тела цикла> end; (англ. down – вниз), команда отличается от предыдущей только тем, что после каждого выполнения команд тела цикла значение счетчика цикла уменьшается на 1.

№ слайда 11 Выполните алгоритм 26
Описание слайда:

Выполните алгоритм 26

№ слайда 12 Создайте проект для вычисления суммы первых 10 натуральных чисел (1 + 2 + … +
Описание слайда:

Создайте проект для вычисления суммы первых 10 натуральных чисел (1 + 2 + … + 10) Задача 1.

№ слайда 13 var i, s: integer; begin s:=0; for i:= 1 to 10 do s:=s + i; Label1.Caption :=
Описание слайда:

var i, s: integer; begin s:=0; for i:= 1 to 10 do s:=s + i; Label1.Caption := IntToStr(s); end; Ответ: 55

№ слайда 14 Задача 2. Создайте проект для вычисления 10! (1*2*3*…*10). Указание: Заменить
Описание слайда:

Задача 2. Создайте проект для вычисления 10! (1*2*3*…*10). Указание: Заменить S на P. 2. P:=1. 3. P:=P*i. 4. Заменить тип integer на longint. Ответ: 3628800

№ слайда 15 ДОМАШНЕЕ ЗАДАНИЕ п. 2.9, стр. 84-88, № 3
Описание слайда:

ДОМАШНЕЕ ЗАДАНИЕ п. 2.9, стр. 84-88, № 3

Выбранный для просмотра документ Отладка программ.pptx

библиотека
материалов
Отладка программ
Актуализация знаний Для чего предназначены компиляторы? В чем особенности их...
Ошибки в Delphi Синтаксические Логические Неверный ввод команд; неверная запи...
Один из способов выявления логической ошибки: создание тестовых наборов входн...
Процесс поиска логических ошибок в тексте программы с использованием тестовы...
Пример y:= (2*x – 5)/x*x + 1 y:= 2*x – 5/x*x + 1 y:= (2*x – 5)/(x*x + 1) при...
Комментарий – это текст, который игнорируется компилятором и включается в т...
procedure TForm1.Button1Click(Sender: TObject); var index, i ,r:Integer; // о...
procedure TForm1.Button1Click(Sender: TObject); var index, i ,r:Integer; //...
Пошаговое исполнение программ (трассировка) Шаг исполнения программы – это ст...
Пример: Найти сумму двух чисел.
Текст программы файла Project1.dpr Ctrl+ F2 – прервать пошаговое исполнение п...
Окно Watch List (список просмотра) Ctrl+F5 Run – Add Watch
Домашнее задание П. 2.6, № 2, 6
14 1

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


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

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

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

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

№ слайда 1 Отладка программ
Описание слайда:

Отладка программ

№ слайда 2 Актуализация знаний Для чего предназначены компиляторы? В чем особенности их
Описание слайда:

Актуализация знаний Для чего предназначены компиляторы? В чем особенности их работы? Какие ошибки могут возникать в процессе разработки проекта? Какие ошибки называются синтаксическими? Как обнаруживаются синтаксические ошибки? Какие ошибки называются логическими?

№ слайда 3 Ошибки в Delphi Синтаксические Логические Неверный ввод команд; неверная запи
Описание слайда:

Ошибки в Delphi Синтаксические Логические Неверный ввод команд; неверная запись идентификаторов; др. Логические ошибки связаны с неверной реализацией алгоритма программы (вместо ‘+’ поставили ‘–‘ и т.п.)

№ слайда 4 Один из способов выявления логической ошибки: создание тестовых наборов входн
Описание слайда:

Один из способов выявления логической ошибки: создание тестовых наборов входных данных с заранее известными результатами и исполнение созданного проекта для этих наборов данных; сравнение полученных результатов с ожидаемыми; поиск команд в программном коде, выполнение которых является причиной появления логических ошибок.

№ слайда 5 Процесс поиска логических ошибок в тексте программы с использованием тестовы
Описание слайда:

Процесс поиска логических ошибок в тексте программы с использованием тестовых наборов входных данных называют тестированием программы.

№ слайда 6 Пример y:= (2*x – 5)/x*x + 1 y:= 2*x – 5/x*x + 1 y:= (2*x – 5)/(x*x + 1) при
Описание слайда:

Пример y:= (2*x – 5)/x*x + 1 y:= 2*x – 5/x*x + 1 y:= (2*x – 5)/(x*x + 1) при х = 0 у = -5 деление на ноль деление на ноль division by zero

№ слайда 7 Комментарий – это текст, который игнорируется компилятором и включается в т
Описание слайда:

Комментарий – это текст, который игнорируется компилятором и включается в текст программы с целью облегчения понимания программного кода. Помогают в поиске логических ошибок комментарии. // - если комментарий будет размещаться только на ОДНОЙ строке. {...} - здесь можно охватывать сколько угодно строк.

№ слайда 8 procedure TForm1.Button1Click(Sender: TObject); var index, i ,r:Integer; // о
Описание слайда:

procedure TForm1.Button1Click(Sender: TObject); var index, i ,r:Integer; // объявление локальны переменных типа целое число begin index:=StrToInt(Edit1.Text); //присваиваем значению index значение Edit1.Text при этом текст преобразуем в число StrToInt i:=StrToInt(Edit2.Text); //смотри выше, аналогично r:=i+index; // присваиваем переменной r сумму i и index Edit3.Text:=IntToStr(r); //Выводим результат , преобразуя число в строку end;

№ слайда 9 procedure TForm1.Button1Click(Sender: TObject); var index, i ,r:Integer; //
Описание слайда:

procedure TForm1.Button1Click(Sender: TObject); var index, i ,r:Integer; // объявление локальны переменных типа целое число begin index:=StrToInt(Edit1.Text); //присваиваем значению index значение Edit1.Text при этом текст преобразуем в число StrToInt i:=StrToInt(Edit2.Text); //смотри выше, аналогично r:=i+index; // присваиваем переменной r сумму i и index Edit3.Text:=IntToStr(r); //Выводим результат , преобразуя число в строку end;

№ слайда 10 Пошаговое исполнение программ (трассировка) Шаг исполнения программы – это ст
Описание слайда:

Пошаговое исполнение программ (трассировка) Шаг исполнения программы – это строка программы (F7). F8 – выполнить подпрограмму за один шаг.

№ слайда 11 Пример: Найти сумму двух чисел.
Описание слайда:

Пример: Найти сумму двух чисел.

№ слайда 12 Текст программы файла Project1.dpr Ctrl+ F2 – прервать пошаговое исполнение п
Описание слайда:

Текст программы файла Project1.dpr Ctrl+ F2 – прервать пошаговое исполнение программы F7

№ слайда 13 Окно Watch List (список просмотра) Ctrl+F5 Run – Add Watch
Описание слайда:

Окно Watch List (список просмотра) Ctrl+F5 Run – Add Watch

№ слайда 14 Домашнее задание П. 2.6, № 2, 6
Описание слайда:

Домашнее задание П. 2.6, № 2, 6

Выбранный для просмотра документ События.pptx

библиотека
материалов
События и их обработчики
Актуализация знаний Назовите окна Turbo Delphi 2007 и поясните их назначение....
Кнопка События Дважды щелкнуть Вкладка Код Заготовка процедуры
Процедура (лат. procedere  – продвигаться, идти вперед) – это часть программы...
Подпрограммы в Delphi Процедуры Функции
Процедура, которая исполняется при наступлении некоторого события, называется...
Создание процедур – обработчиков событий в Delphi (структура процедуры) proce...
Команды установки свойств объекта в результате исполнения процедуры . := ;
Например: Form1.Color := clGreen; - установить цвет фона окна – зеленый; For...
Средства помощи во время ввода текста проекта: после ввода первой буквы имени...
текст с ошибкой подчеркивается красной волнистой линией; принято писать перву...
После запуска проекта на исполнение компилятор анализирует текст на наличие с...
Ввод и вывод данных во время исполнения проекта Задание. Создадим процедуру,...
Задание на дом: п. 2.5, стр. 51-59, № 4, 5
14 1

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


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

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

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

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

№ слайда 1 События и их обработчики
Описание слайда:

События и их обработчики

№ слайда 2 Актуализация знаний Назовите окна Turbo Delphi 2007 и поясните их назначение.
Описание слайда:

Актуализация знаний Назовите окна Turbo Delphi 2007 и поясните их назначение. Что такое форма? Назовите несколько ее свойств. Как изменить их значения? Какие общие свойства имеют кнопка, надпись, поле и область изображения? Какие свойства имеют одни из них и не имеют другие?

№ слайда 3 Кнопка События Дважды щелкнуть Вкладка Код Заготовка процедуры
Описание слайда:

Кнопка События Дважды щелкнуть Вкладка Код Заготовка процедуры

№ слайда 4 Процедура (лат. procedere  – продвигаться, идти вперед) – это часть программы
Описание слайда:

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

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

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

№ слайда 6 Процедура, которая исполняется при наступлении некоторого события, называется
Описание слайда:

Процедура, которая исполняется при наступлении некоторого события, называется обработчиком этого события. Процедура, связанная с определенным объектом, называется методом этого объекта.

№ слайда 7 Создание процедур – обработчиков событий в Delphi (структура процедуры) proce
Описание слайда:

Создание процедур – обработчиков событий в Delphi (структура процедуры) procedure TForm1.Button1Click (Sender: TObject); begin end; Строка заголовка Стандартное слово Имя процедуры Точка с запятой Команды процедуры (тело процедуры) begin и end называют операторными скобками. Точка с запятой Каждая команда процедуры также должна заканчиваться точкой с запятой

№ слайда 8 Команды установки свойств объекта в результате исполнения процедуры . := ;
Описание слайда:

Команды установки свойств объекта в результате исполнения процедуры <имя объекта>.<имя свойства> := <значение или выражение>;

№ слайда 9 Например: Form1.Color := clGreen; - установить цвет фона окна – зеленый; For
Описание слайда:

Например: Form1.Color := clGreen; - установить цвет фона окна – зеленый; Form1.Left := 300; - установить отступ левой границы окна - 300 пикселей; Form1.Width := Form1.Width*2; - увеличить текущую ширину окна вдвое; Button1.Caption := 'Увеличить'; - установить текст заглавия на кнопке - Увеличить (если значением свойства является текст, то его нужно заключать в одинарные кавычки); Label1.Font.Color := clRed; - установить цвет символов, которым будет отображаться текст в надписи, - красный.

№ слайда 10 Средства помощи во время ввода текста проекта: после ввода первой буквы имени
Описание слайда:

Средства помощи во время ввода текста проекта: после ввода первой буквы имени объекта нажать Ctrl + Пробел;

№ слайда 11 текст с ошибкой подчеркивается красной волнистой линией; принято писать перву
Описание слайда:

текст с ошибкой подчеркивается красной волнистой линией; принято писать первую букву каждого слова большой; TForm1.Button1Click; после ввода точки, которая разделяет имя объекта и имя свойства, автоматически открывается список свойств данного объекта; Выбрать свойство и нажать Enter

№ слайда 12 После запуска проекта на исполнение компилятор анализирует текст на наличие с
Описание слайда:

После запуска проекта на исполнение компилятор анализирует текст на наличие синтаксических ошибок

№ слайда 13 Ввод и вывод данных во время исполнения проекта Задание. Создадим процедуру,
Описание слайда:

Ввод и вывод данных во время исполнения проекта Задание. Создадим процедуру, которая позволит изменить цвет окна и увеличить его высоту на произвольное целое количество пикселей. procedure TForm1.Button1Click(Sender: TObject); begin Form1.Color := StringToColor(Edit1.Text); Form1.Hight := Form1.Hight + StrToInt(Edit2.Text); end;

№ слайда 14 Задание на дом: п. 2.5, стр. 51-59, № 4, 5
Описание слайда:

Задание на дом: п. 2.5, стр. 51-59, № 4, 5

Выбранный для просмотра документ Составные логические выражения.pptx

библиотека
материалов
Составные логические 	выражения. Вложенные команды ветвления
Логическое выражение в команде ветвления может быть простым или составным. Со...
Использование составных логических выражений Задача 1.	Вычислить значение зад...
procedure TForm1.Button1Click(Sender: TObject); var x,y: real; begin x:=StrTo...
Отладочные данные
Вложенные команды ветвления Задача 2. Даны два числа. Определить, равны ли он...
If x=y then Label1.Caption :=  Числа равны  else if x>y then Label1.Caption...
Задача 6 (учебник). Создайте проект, который определяет меньшее число среди т...
Домашнее задание: п. 2.8 (стр. 78 – 79) Задание № 9
9 1

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


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

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

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

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

№ слайда 1 Составные логические 	выражения. Вложенные команды ветвления
Описание слайда:

Составные логические выражения. Вложенные команды ветвления

№ слайда 2 Логическое выражение в команде ветвления может быть простым или составным. Со
Описание слайда:

Логическое выражение в команде ветвления может быть простым или составным. Составные логические выражения образуются из простых путем использования операций конъюнкции (and) , дизъюнкции (or), отрицания (not).

№ слайда 3 Использование составных логических выражений Задача 1.	Вычислить значение зад
Описание слайда:

Использование составных логических выражений Задача 1. Вычислить значение заданной функции y = 2x-12, если -3< x <5, 7-8x для всех других значений x.

№ слайда 4 procedure TForm1.Button1Click(Sender: TObject); var x,y: real; begin x:=StrTo
Описание слайда:

procedure TForm1.Button1Click(Sender: TObject); var x,y: real; begin x:=StrToFloat(Edit1.Text); if (x > -3) and (x < 5) then y:= 2*x -12 else y:= 7 - 8*x; Label1.Caption := FloatToStr(y); end; end.

№ слайда 5 Отладочные данные
Описание слайда:

Отладочные данные

№ слайда 6 Вложенные команды ветвления Задача 2. Даны два числа. Определить, равны ли он
Описание слайда:

Вложенные команды ветвления Задача 2. Даны два числа. Определить, равны ли они? Если нет, то какое из них больше?

№ слайда 7 If x=y then Label1.Caption :=  Числа равны  else if x&gt;y then Label1.Caption
Описание слайда:

If x=y then Label1.Caption :=  Числа равны  else if x>y then Label1.Caption :=  Первое число больше  else Label1.Caption :=  Второе число больше ; Фрагмент программы:

№ слайда 8 Задача 6 (учебник). Создайте проект, который определяет меньшее число среди т
Описание слайда:

Задача 6 (учебник). Создайте проект, который определяет меньшее число среди трех разных чисел.

№ слайда 9 Домашнее задание: п. 2.8 (стр. 78 – 79) Задание № 9
Описание слайда:

Домашнее задание: п. 2.8 (стр. 78 – 79) Задание № 9

Выбранный для просмотра документ Стандартные процедуры и функции.pptx

библиотека
материалов
Стандартные процедуры и функции в Delphi
Задача 1.	Вычислите абсолютную величину числа, вводимого с клавиатуры (abs(x)...
Задача .	Даны действительные числа s и t. Получить: f(t, -2s, 1.17) + f(2.2,...
Function F(a,b,c:real):real; begin F:=(2*a-b-sin(c))/(5+c); end; {$R *.dfm} p...
Задача 9.	Создайте проект, в котором для двух заданных целых чисел определяет...
стр. 99-100, № 10 Домашнее задание:
7 1

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


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

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

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

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

№ слайда 1 Стандартные процедуры и функции в Delphi
Описание слайда:

Стандартные процедуры и функции в Delphi

№ слайда 2
Описание слайда:

№ слайда 3 Задача 1.	Вычислите абсолютную величину числа, вводимого с клавиатуры (abs(x)
Описание слайда:

Задача 1. Вычислите абсолютную величину числа, вводимого с клавиатуры (abs(x)). Задача 2. Вычислите синус числа, вводимого с клавиатуры (sin(x)). Задача 3. Вычислите дробную часть числа, вводимого с клавиатуры (frac(x)) . Задача 4. Вычислите целую часть числа, вводимого с клавиатуры (int(x)).

№ слайда 4 Задача .	Даны действительные числа s и t. Получить: f(t, -2s, 1.17) + f(2.2,
Описание слайда:

Задача . Даны действительные числа s и t. Получить: f(t, -2s, 1.17) + f(2.2, t, s-t), где

№ слайда 5 Function F(a,b,c:real):real; begin F:=(2*a-b-sin(c))/(5+c); end; {$R *.dfm} p
Описание слайда:

Function F(a,b,c:real):real; begin F:=(2*a-b-sin(c))/(5+c); end; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); Var s,t,y:real; begin s:=StrToFloat(Edit1.Text); t:=StrToFloat(Edit2.Text); y:=F(t,-2*s,1.17)+F(2.2,t,s-t); Label1.Caption:=FloatToStr(y); end;

№ слайда 6 Задача 9.	Создайте проект, в котором для двух заданных целых чисел определяет
Описание слайда:

Задача 9. Создайте проект, в котором для двух заданных целых чисел определяется, какое из них имеет большую сумму цифр. Используйте процедуру для нахождения суммы цифр заданного целого числа. Procedure Sum (a, x : integer; var s : integer); Begin s:=0; Repeat x:=a mod 10; s:=s+x; a:=a div 10; Until a=0; end; Вызов процедуры: Sum (b, s1); Sum (c, s2); Отладочные данные: 1) 1234, 5678 Ответ: второе число

№ слайда 7 стр. 99-100, № 10 Домашнее задание:
Описание слайда:

стр. 99-100, № 10 Домашнее задание:

Выбранный для просмотра документ Функции пользователя.pptx

библиотека
материалов
ФУНКЦИИ ПОЛЬЗОВАТЕЛЯ В DELPHI
Функция пользователя, как и процедура пользователя – это отдельная часть пр...
ОТЛИЧИЯ ФУНКЦИИ ОТ ПРОЦЕДУРЫ: function  (): ; Значение, которое функция должн...
Оформим как функцию фрагмент программы вычисления НОД двух натуральных чисел:...
Задача 6. Запишите функцию, которая вычисляет длину отрезка по известным коор...
Задача 8. Создайте проект, в котором можно найти максимальное из четырех разн...
Задача . Даны действительные числа s и t. Получить: f(t, -2s, 1.17) + f(2.2,...
Домашнее задание стр. 98-99, № 7
8 1

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


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

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

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

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

№ слайда 1 ФУНКЦИИ ПОЛЬЗОВАТЕЛЯ В DELPHI
Описание слайда:

ФУНКЦИИ ПОЛЬЗОВАТЕЛЯ В DELPHI

№ слайда 2 Функция пользователя, как и процедура пользователя – это отдельная часть пр
Описание слайда:

Функция пользователя, как и процедура пользователя – это отдельная часть программы, которая имеет свое имя и может быть вызвана для выполнения в любой другой части программы.

№ слайда 3 ОТЛИЧИЯ ФУНКЦИИ ОТ ПРОЦЕДУРЫ: function  (): ; Значение, которое функция должн
Описание слайда:

ОТЛИЧИЯ ФУНКЦИИ ОТ ПРОЦЕДУРЫ: function <имя> (<списки аргументов с их типами>): <тип результата >; Значение, которое функция должна вернуть (передать) вызывающей ее команде, в тексте самой функции должно быть присвоено переменной, имя которой совпадает с именем функции. Функция может быть вызвана либо в правой части команды присваивания, либо в команде вывода.

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

Оформим как функцию фрагмент программы вычисления НОД двух натуральных чисел: Function MCD (a,b: integer): integer; Var r: integer; begin r := a mod b; while r <> 0 do begin a := b; b := r; r := a mod b; end; MCD:=b; end; 2 аргумента – a и b 1 результат – c (НОД) Вызов функции: к := МCD(35, 77) X=7

№ слайда 5 Задача 6. Запишите функцию, которая вычисляет длину отрезка по известным коор
Описание слайда:

Задача 6. Запишите функцию, которая вычисляет длину отрезка по известным координатам его концов. Запишите команду вызова этой функции для вычисления длины отрезка а с координатами концов (0; 0) и (20; 30).

№ слайда 6 Задача 8. Создайте проект, в котором можно найти максимальное из четырех разн
Описание слайда:

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

№ слайда 7 Задача . Даны действительные числа s и t. Получить: f(t, -2s, 1.17) + f(2.2,
Описание слайда:

Задача . Даны действительные числа s и t. Получить: f(t, -2s, 1.17) + f(2.2, t, s-t), где

№ слайда 8 Домашнее задание стр. 98-99, № 7
Описание слайда:

Домашнее задание стр. 98-99, № 7


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


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

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

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

Краткое описание документа:

Несколько презентаций уроков изучения основных принципов объектно-ориентированного программирования в школе. Презентации описывают некоторые аспекты работы в интегрированной среде визуальной разработки Turbo Delphi 2007. Предлагаются следующие темы:

1. События и их обработчики.

2. Стандартные процедуры и функции в Delphi.

3. Ветвление в алгоритмах и программах.

4. Составные логические выражения.

5. Циклы в алгоритмах и программах. Команда цикла со счетчиком.

6. Отладка программ.

7. Функции пользователя в Delphi.

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

Автор
Дата добавления 24.11.2014
Раздел Информатика
Подраздел Презентации
Просмотров682
Номер материала 151248
Получить свидетельство о публикации
Похожие материалы

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